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*****  INTRODUCTION  ***** 

THE  COMPUTER  CENTER  MAKES  AVAILABLE  ON  THE  CDC  COMPUTERS,  IN 
ADDITION  TO  THE  NOS/BE  OPERATING  SYSTEM,  A  WIDE  VARIETY  OF  BOTH 
SCIENTIFIC  AND  UTILITY  PROGRAMS,  SUBPROGRAMS  AND  CATALOGUED  PROCEDURES. 
MOST  OF  THE  ROUTINES  ARE  MAINTAINED  IN  LIBRARIES  ON  PERMANENT  FILES  AND 
MAY  BE  INVOKED  BY  THE  APPROPRIATE  (LOADER)  CONTROL  STATEMENTS.  A  FEW 
PROGRAMS  ARE  AVAILABLE  AS  INDEPENDENT  PERMANENT  FILES. 

THE  CLIB-SERIES  OF  MANUALS  CONSISTS  OF  THE  FOLLOWING,  WHICH 
DESCRIBE  THE  CONTENTS  OF  THE  VARIOUS  CDC  CYBER  LIBRARIES  MAINTAINED  BY 
THE  COMPUTER  CENTER: 

CL IB  -  COMPUTER  CENTER  CDC  LIBRARIES 

CLIB/N  -  COMPUTER  CENTER  CDC  LIBRARIES/NSRDC  AND  NSRDC5 
(SUBPROGRAMS) 

CLIB/P  -  COMPUTER  CENTER  CDC  LIBRARIES/PROCFIL 
(PROCEDURES) 

CLIB/U  -  COMPUTER  CENTER  CDC  LIBRARIES/UTILITY 
(PROGRAMS) 

CLIB/M  -  COMPUTER  CENTER  CDC  LIBRARIES/MNSRDC 
(PROGRAMS) 

THIS  MANUAL,  CLIB/P,  IS  A  REFERENCE  MANUAL  WHICH  DESCRIBES  MOST  OF 
CATALOGUED  PROCEDURES  IN  LIBRARY  'PROCFIL'. 


***  HOW  TO  USE  THIS  MANUAL  *** 

THE  PROCEDURES  ARE  CLASSIFIED  IN  ONE  OR  MORE  FUNCTIONAL  CATEGORIES 
(SEE  PAGE  1-3  FOR  A  LIST  OF  CATEGORIES) .  THEY  ARE  LISTED,  BEGINNING  ON 
PAGE  1-6,  UNDER  THE  VARIOUS  CATEGORIES.  THE  INDIVIDUAL  PROCEDURES  ARE 
LISTED,  WITH  DESCRIPTIVE  TITLE,  BEGINNING  ON  PAGE  1-8.  CHAPTER  2 
CONTAINS  ALL  AVAILABLE  MACHINE-READABLE  DOCUMENTS  DESCRIBING  THE  USE  OF 
PROCEDURES  IN  LIBRARY  'PROCFIL’. 
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***  LIBRARIES  PROCFIL,  I,  MSS  *** 

A  CATALOGUED  PROCEDURE  IS  A  SET  OF  CONTROL  CARDS  WHICH  ACCOMPLISH  A 
TASK.  LIBRARY  'PROCFIL'  CONTAINS  MANY  DTNSRDC  WRITTEN  AND/OR  SUPPORTED 
PROCEDURES.  FILE  'I'  IS  A  SUBSET  OF  INTERACTIVE  VERSIONS  OF  SOME 
PROCEDURES.  FILE  'MSS'  IS  A  SUBSET  OF  THOSE  PROCEDURES  WHICH  ARE  USED 
WITH  THE  MASS  STORAGE  SYSTEM. 


***  EXECUTING  A  PRODECURE  *** 


MOST  OF  THE  PROCEDURES  MAY  BE  EXECUTED  BY: 


BEGIN , <PROCNAME> , , <PARAMETERS> . 


-  OR  - 


BEGIN, <PROCNAME> , I , <PARAMETERS>  <<  FOR  INTERACTIVE  PROCEDURES 
-  OR  - 


BEGIN , <PROCNAME> , I ,  ? 


«  FOR  INTERACTIVE  PROMPTING 


BEGIN, <PROCNAME>, MSS, <PARAMETERS>.  «  FOR  MSS  PROCEDURES  ONLY 


THE  INDIVIDUAL  DOCUMENTS  DESCRIBE  THE  <PARAMETERS> ,  IF  ANY,  AND  THE 
METHOD  OF  EXECUTION. 
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***  FUNCTIONAL  CATEGORIES  *** 

THE  FOLLOWING  FUNCTIONAL  CATEGORIES  ARE  USED  AT  DTNSRDC.  THOSE 
CATEGORIES  PRECEDED  BY  AN  ASTERISK  (*)  ARE  LOCAL  DTNSRDC  CATEGORIES. 

THE  OTHER  ARE  FROM  THE  VIM  (CDC  USERS  GROUP)  LIST. 

AO  ARITHMETIC  ROUTINES 
Al  REAL  NUMBERS 
A2  COMPLEX  NUMBERS 
A3  DECIMAL 
A4  I/O  ROUTINES 

BO  ELEMENTARY  FUNCTIONS 
B1  TRIGONOMETRIC 
B2  HYPERBOLIC 

B3  EXPONENTIAL  AND  LOGARITHMIC 
B4  ROOTS  AND  POWERS 

CO  POLYNOMIALS  AND  SPECIAL  FUNCTIONS 
Cl  EVALUATION  OF  POLYNOMIALS 
C2  ROOTS  OF  POLYNOMIALS 

C3  EVALUATION  OF  SPECIAL  FUNCTIONS  (NON-STATISTICAL) 

C4  SIMULTANEOUS  NON-LINEAR  ALGEBRAIC  EQUATIONS 
C5  SIMULTANEOUS  TRANSCENDENTAL  EQUATIONS 

*  C6  ROOTS  OF  FUNCTIONS 

DO  OPERATIONS  ON  FUNCTIONS  AND  SOLUTIONS  OF  DIFFERENTIAL  EQUATIONS 
D1  NUMERICAL  INTEGRATION 

D2  NUMERICAL  SOLUTIONS  OF  ORDINARY  DIFFERENTIAL  EQUATIONS 
D3  NUMERICAL  SOLUTIONS  OF  PARTIAL  DIFFERENTIAL  EQUATIONS 
D4  NUMERICAL  DIFFERENTIATION 

EO  INTERPOLATION  AND  APPROXIMATIONS 
El  TABLE  LOOK-UP  AND  INTERPOLATION 
E2  CURVE  FITTING 
E3  SMOOTHING 

E4  MINIMIZING  OR  MAXIMIZING  A  FUNCTION 

FO  OPERATIONS  ON  MATRICES,  VECTORS  &  SIMULTANEOUS  LINEAR  EQUATIONS 
FI  VECTOR  AND  MATRIX  OPERATIONS 
F2  EIGENVALUES  AND  EIGENVECTORS 
F3  DETERMINANTS 

F4  SIMULTANEOUS  LINEAR  EQUATIONS 

GO  STATISTICAL  ANALYSIS  AND  PROBABILITY 
G1  DATA  REDUCTION  (COMMON  STATISTICAL  PARAMETERS) 

G2  CORRELATION  AND  REGRESSION  ANALYSIS 
G3  SEQUENTIAL  ANALYSIS 
G4  ANALYSIS  OF  VARIANCE 
G5  TIME  SERIES 

G6  SPECIAL  FUNCTIONS  (INCLUDES  RANDOM  NUMBERS  AND  PDF'S) 

*  G7  MULTIVARIATE  ANALYSIS  AND  SCALE  STATISTICS 

*  G8  NON-PARAMETRIC  METHODS  AND  STATISTICAL  TESTS 

*  G9  STATISTICAL  INFERENCE 
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HO  OPERATIONS  RESEARCH  TECHNIQUES,  SIMULATION  &  MANAGEMENT  SCIENCE 

HI  LINEAR  PROGRAMMING 

H2  NON-LINEAR  PROGRAMMING 

H3  TRANSPORTATION  AND  NETWORK  CODES 

H4  SIMULATION  MODELING 

H5  SIMULATION  MODELS 

H6  CRITICAL  PATH  PROGRAMS 

H8  AUXILIARY  PROGRAMS 

H9  COMBINED 

10  INPUT 

11  BINARY 

12  OCTAL 

13  DECIMAL 

14  BCD  (HOLLERITH) 

19  COMPOSITE 

JO  OUTPUT 
J1  BINARY 
J2  OCTAL 
J3  DECIMAL 
J4  BCD  (HOLLERITH) 

J5  PLOTTING 
J7  ANALOG 
J9  COMPOSITE 

KO  INTERNAL  INFORMATION  TRANSFER 
K1  EXTERNAL-TO-EXTERNAL 
K2  INTERNAL- TO- INTERNAL  (RELOCATION) 

K3  DISK 
K4  TAPE 

K5  DIRECT  DATA  DEVICES 

LO  EXECUTIVE  ROUTINES 
LI  ASSEMBLY 
L2  COMPILING 
L3  MONITORING 
L4  PREPROCESSING 

L5  DISASSEMBLY  AND  DERELATIVIZING 
L6  RELATIVIZING 

L7  COMPUTER  LANGUAGE  TRANSLATORS 


MO  DATA  HANDLING 
Ml  SORTING 

M2  CONVERSION  AND/OR  SCALING 
M3  MERGING 

M4  CHARACTER  MANIPULATION 
M5  SEARCHING,  SEEKING,  LOCATING 
M6  REPORT  GENERATORS 
M9  COMPOSITE  ' 

NO  DEBUGGING 
N1  TRACING  AND  TRAPPING 
N2  DUMPING 

N3  MEMORY  VERIFICATION  AND  SEARCHING 
N4  BREAKPOINT  PRINTING 
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00  SIMULATION  OF  COMPUTERS  AND  DATA  PROCESSORS  (INTERPRETERS) 

01  OFF-LINE  EQUIPMENT  (LISTERS,  REPRODUCERS,  ETC.) 

03  COMPUTERS 
04  PSEUDO-COMPUTERS 

05  SOFTWARE  SIMULATION  OF  PERIPHERALS 
09  COMPOSITE 

PO  DIAGNOSTICS  (HARDWARE  MALFUNCTION) 

QO  SERVICE  OR  HOUSEKEEPING,  PROGRAMMING  AIDS 
Q1  CLEAR/RESET 

Q2  CHECKSUM  ACCUMULATION  AND  CORRECTION 

Q3  REWIND,  TAPE  MARK,  LOAD  CARDS,  LOAD  TAPE  PROGRAMS,  ETC. 

Q4  INTERNAL  HOUSEKEEPING,  SAVE,  RESTORE,  ETC. 

Q5  REPORT  GENERATOR  SUBROUTINES 

Q6  PROGRAM  DOCUMENTATION:  FLOW  CHARTS,  DOCUMENT,  STANDARDIZATION 
Q7  PROGRAM  LIBRARY  UTILITIES 

RO  LOGIC  AND  SYMBOLIC 
R1  FORMAL  LOGIC 
R2  SYMBOL  MANIPULATION 
R3  LIST  AND  STRING  PROCESSING 
R4  TEXT  EDITING 

SO  INFORMATION  RETRIEVAL 

TO  APPLICATIONS  AND  APPLICATION-ORIENTED  PROGRAMS 
T1  PHYSICS  (INCLUDING  NUCLEAR) 

T2  CHEMISTRY 

T3  OTHER  PHYSICAL  SCIENCES  (GEOLOGY,  ASTRONOMY,  ETC.) 

T4  ENGINEERING 
T5  BUSINESS  DATA  PROCESSING 

T6  MANUFACTURING  (NON-DATA)  PROCESSING  AND  PROCESS  CONTROL 
T7  MATHEMATICS  AND  APPLIED  MATHEMATICS 
T8  SOCIAL  AND  BEHAVIORAL  SCIENCES  AND  PSYCHOLOGY 
T9  BIOLOGICAL  SCIENCES 

T10  REGIONAL  SCIENCES  (GEOGRAPHY,  URBAN  PLANNING) 

Til  COMPUTER  ASSISTED  INSTRUCTION 

UO  LINGUISTICS  AND  LANGUAGES 

VO  GENERAL  PURPOSE  UTILITY  SUBROUTINES 
VI  RANDOM  NUMBER  GENERATORS 

V2  COMBINATORIAL  GENERATORS:  PERMUTATIONS,  COMBINATIONS  4  SUBSETS 
V3  STANDARD  AND  SPECIAL  PROBLEMS 

XO  DATA  REDUCTION 

XI  RE- FORMATTING,  DECOMMUTATION,  ERROR  DIAGNOSIS 
X2  EDITING 
X3  CALIBRATION 
X4  EVALUATION 

X5  ANALYSIS  (TIME-SERIES  ANALYSIS) 

X6  SIMULATION  (GENERATE  TEST  DATA  FOR  DATA  REDUCTION  SYSTEM) 

YO  INSTALLATION  MODIFICATION 

Y1  INSTALLATION  MODIFICATION  LIBRARY 

Y2  NEWPL  TAPE  OF  INSTALLATION  MODIFICATIONS 


ZO  ALL  OTHERS 
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***  LIST  OF  PROCEDURES  BY  CATEGORY  *** 

THE  PUBLIC-ACCESS  PROCEDURES  ARE  LISTED  BELOW  UNDER  THEIR 
FUNCTIONAL  CATEGORIES.  AN  ALPHABETICAL  LIST,  WITH  A  BRIEF  DESCRIPTION 
OF  EACH  PROCEDURE  BEGINS  ON  PAGE  1-7. 


A4  I/O  ROUTINES 
XEROX 

J1  BINARY 

CV029 


J4  BCD  (HOLLERITH) 


BANNERS 

COMQ 

LINE6 

LINE8 

PM 

J5 

PLOTTING 

CALC3D 

IDDS 

K1 

EXTERNAL-TO-EXTERNAL 

FETCHC 

MSS2PF 

RECADD1 

TAPRD 

C2M 

FETCHM 

M2C 

RECDEL1 

TAPWR 

C2MALL 

GETMS 

M2CALL 

RECGET1 

D2A 

MF2MF 

PUTMS 

RECREP1 

K3 

DISK 

COPYLIB 

SELDUMP 

UPDADD 

UPDGET 

UPDGETT 

PROS2R 

TRANPK 

UPDDELE 

UPDGETS 

UPDREPL 

K4 

TAPE 

COPYBLK 

SELLOAD 

LO 

EXECUTIVE  ROUTINES 

ANYLIB 

DISPOST 

LIBSET1 

MYPROS 

S2K260 

ANYPRO 

IDDS 

LIBSET2 

NOGO 

S2K280 

ANYPROS 

LIBPRO 

MNSRDC 

PROGRAM 

UTILITY 

BIGLOAD 

LIBPROA 

MYPRO 

SEGLD 

L2 

COMPILING 

RUNBAS 

RUNFTN5 

RUNPAS 

RUNTS 

RUNFTN 

RUNMNF 

RUNSEQ 

L7  COMPUTER  LANGUAGE  TRANSLATORS 
F45IT 


Ml  SORTING 

AUDIT  MS AUDIT  SORT  SORTCZ 

M2  CONVERSION  AND/OR  SCALING 
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01  OFF-LINE  EQUIPMENT  (LISTERS,  REPRODUCERS,  ETC.) 


ASCDOC 

DOC DOC 

PROALL 

PURPOSE 

UPDDOC 

CV029 

LIST 

PRODOC 

RECDOC 

UPDLIST 

DOCDATE 

MANUAL 

PROLIST 

TIDBITS 

QO 

SERVICE  OR  HOUSEKEEPING,  PROGRAMMING 

AIDS 

ASCI 10 

DS AUDIT 

GRIPE 

NORERUN 

TPGET 

AUDIT 

DSRLS 

MFX 

OFLREQ 

TPRLS 

BANNERS 

FETCHC 

MSAUDIT 

PAKPAS 

WHATLIB 

BDT 

FETCHM 

MSSALL 

PARMGET 

XEROX 

COMQ 

GETMFNS 

MSTABLE 

PUTMS 

C2M 

GETMS 

M2C 

SEND 

C2MALL 

GETPROD 

M2CALL 

TPAUDIT 

Q3 

FILE  MANIPULATION 

ANYLIB 

DISPOST 

LIBSET2 

NOGO 

S2K280 

ANYPRO 

LIBPRO 

MNSRDC 

PROGRAM 

UPDLIST 

ANYPROS 

LIBPROA 

MYPRO 

SEGLD 

UTILITY 

BIGLOAD 

LIBSET1 

MYPROS 

S2K260 

Q4 

INTERNAL  HOUSEKEEPING,  SAVE, 

RESTORE, 

ETC. 

ADDEXT 

PAHC 

PHC 

PURGEN 

SELDUMP 

NEW  ID 

PALC 

PLC 

RENAMAC 

SELLOAD 

PAC 

PFRSTOR 

PURGALL 

RENAMID 

Q6 

PROGRAM  DOCUMENTATION:  FLOW 

CHARTS,  DOCUMENT  STANDARDIZATION 

DOCADD 

DOCFILE 

DOCLIST 

LGOTREE 

DOCDELE 

DOCGET 

DOCREPL 

PGMTAPE 

Q7 

PROGRAM  LIBRARY 

UTILITIES 

COPYLIB 

PROGET 

PROREPL 

UPDADD 

UPDGETS 

PROADD 

PROHDR 

PR0S2R 

UPDDELE 

UPDGETT 

PRODELE 

PRONAM 

SEGO 

UPDGET 

UPDREPL 

R4  TEXT  EDITING 
ASCDOC 

SO  INFORMATION  RETRIEVAL 

AUDIT  CCNOTE  MS AUDIT  PURPOSE  VENUS 
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***  DESCRIPTIVE  TITLES  *** 

THE  PUBLIC-ACCESS  PROCEDURES  ARE  LISTED  ALPHABETICALLY  BELOW. 
PROCEDURES  IN  THE  MSS  PROCEDURE  FILE  HAVE  ”«  MSS"  AFTER  THE 
DESCRIPTION. 

ADDEXT  MODIFY  PRIVATE  PACK  DUM  FILE  FOR  LEVEL  508  DUMPF/LOADPF 

ANYLIB  EXECUTE  A  PROGRAM  ON  ANY  EDITLIB  USER  LIBRARY 

ANYPRO  EXECUTE  A  PROCEDURE  ON  ANY  CATALOGUED  PROCEDURE  FILE 

ANYPROS  EXECUTE. A  PROCEDURE  ON  ANY  CATALOGUED  SEQUENTIAL  PROCEDURE 
FILE 

ASCDOC  PRINT  DOCUMENTS  FOR  ALL  ROUTINES  IN  THE  ASCII  PACKAGE 

ASCI 10  CREATE  LABELLED  COMMON  BLOCKS  FOR  ASCII  PACKAGE 

AUDIT  SORTED  (FAST)  USER  AUDIT 

BANNERS  PRINT  A  PAGE  WITH  1  TO  8  BANNERS 

BDT  PRINT  A  BANNER  PAGE  WITH  DATE  AND  TIME 

BIGLOAD  CREATE  AN  ABSOLUTE  FILE  WHICH  WILL  ALLOW  SOME  LARGE  PROGRAMS 

TO  LOAD  IN  LESS  CORE  THAN  NORMALLY  NEEDED 

CALC 3D  THREE-D  PROCEDURE  FOR  CALCOMP  PLOTTERS 

CCNOTE  PRINT  A  COMPUTER  CENTER  NOTE  OR  THE  CCN  INDEX 

COMQ  PREPARE  AND  ROUTE  A  FILE  TO  THE  MICROFICHE  QUEUE 

COPYBLK  REBLOCK  STRANGER  TAPES  TO  SCOPE  STANDARD  FILES  (BOTH 
UNBLOCKED  CARD  AND  PRINT  LINE  IMAGE  TAPES  AND  BLOCKED 
STRANGER  TAPES) 

COPYLIB  CONDENSE  (AND  SORT)  AN  EDITLIB  USER  LIBRARY  PRESERVING  AL, 
FL,  FLO  VALUES.  BINDEX  AND  LISTBIN  LISTS  ARE  PROVIDED. 

CV029  CONVERT  TO  029  PUNCH  CODE 

C2M  TRANSFER  ONE  CDC  PERMANENT  FILE  (OF  EXECUTING  USER)  TO  MASS 

STORAGE  SYSTEM  (BASED  ON  USER'S  CDC  FILE  TABLE/MFNPFN)  <<  MSS 

C2MALL  TRANSFER  ALL  CDC  PERMANENT  FILES  (OF  EXECUTING  USER)  TO  MASS 
STORAGE  SYSTEM  (BASED  ON  USER’S  CDC  FILE  TABLE/MFNPFN)  <<  MSS 


DISPOST  INVOKE  DISSPLA  POSTPROCESSORS  (TEK300  OR  TEK480) 
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DOCADD 

DOCDATE 

DOCDELE 

DOCDOC 

DOCFILE 

DOCGET 

DOCLIST 

DOCREPL 

DSAUDIT 

DSRLS 

D2A 

FETCHC 

FETCHM 

F45IT 

GETMFNS 

GETMS 

GETPROD 

GRIPE 

IDDS 

LGOTREE 


ADD  ONE  DOCUMENT  TO  A  DOCUMENTATION  FILE 

LIST  DOCUMENT  NAMES  (ON  *DECK  CARDS)  TOGETHER  WITH  THE 
DOCUMENT  DATE  AND  PAGE  NUMBERS  (FROM  BOTTOM  LINE  OF  EACH 
PAGE) 

DELETE  ONE  DOCUMENT  FROM  A  DOCUMENTATION  FILE 

LIST  DOCUMENTATION  FOR  PROCEDURES  DOCADD,  DOCDATE,  DOCDELE, 
DOCDOC,  DOCFILE,  DOCGET,  DOCLIST,  DOCREPL 

ATTACH  A  DOCUMENTATION  FILE 

GET  (EXTRACT)  DOCUMENT (S)  FROM  A  DOCUMENT  FILE 

LIST  DOCUMENT  NAMES  (ON  *DECK  CARDS)  IN  A  DOCUMENTATION  FILE 

REPLACE  ONE  DOCUMENT  IN  A  DOCUMENTATION  FILE 

AUDIT  DISKS  ASSIGNED  TO  USER  INITIALS 

RELEASING  OF  ASSIGNED  DISKS 

CONVERT  DISPLAY  CODE  FILE  TO  ASCII  FOR  FILE  TRANSFER  VIA 
NALCON /ARPANET 

GET  CSYS  OR  PUBLIC  FILES  (FROM  MSS,  IF  NECESSARY)  «  MSS 
GET  ANY  FILE  (FROM  MSS,  IF  NECESSARY)  «  MSS 
SIMPLE  CONVERSION  OF  FTN4  SOURCE  TO  FTN5 
DO  MS AUDIT  AND  EXTRACT  FILE  NAMES  <<  MSS 

TRANSFER  ONE  MSS  FILE  (OF  EXECUTING  USER)  TO  A  CDC  PERMANENT 
FILE  «  MSS 

GET  PRODUCTS  FILE(S)  FOR  NOS/BE  LEVELS  538,  518,  508,  461, 
439,  434,  420,  414,  410,  406,  401,  380  FROM  THE  MASS  STORAGE 
SYSTEM 

ALLOW  USER  TO  MAKE  GRIPES  OR  SUGGESTIONS  DIRECTLY  TO  THE 
COMPUTER 

PREPARE/EXAMINE  GRAPHICALLY  NUMERICAL  DATA  INPUT  TO  OR  OUTPUT 
FROM  A  FORTRAN  PROGRAM 

GENERATE  CROSS-REFERENCE  LISTS  AND  TREE  STRUCTURE  FROM  BINARY 
RELOCATABLE  OBJECT  PROGRAM 
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PAC 

PAHC 

PAKPAS 

PALC 

PARMGET 

PFRSTOR 

PGMTAPE 

PHC 

PLC 

PM 

PROADD 

PROALL 

PRODELE 

PRODOC 

PROGET 

PROGRAM 

PROHDR 

PROLIST 

PRONAM 

PROREPL 

PROS2R 

PURGALL 


PURGE  ALL  CYCLES  OF  A  FILE 

PURGE  ALL  HIGH  CYCLES  WHILE  RETAINING  LOW  CYCLE 

CHANGE  PRIVATE  PACK  PASSWORDS,  OPTIONALLY  ADD  EXTEND  PASSWORD 
TO  PRE-LEVEL  508  PACKS 

PURGE  ALL  LOW  CYCLES  WHILE  RETAINING  HIGH  CYCLE 

GENERATE  SUBROUTINE  'PARMGET'  TO  PROCESS  USER  EXECUTE 
PARAMETERS  FOR  FTN5  PROGRAMS 

CREATE  A  FILE  OF  DIRECTIVES  TO  RESTORE  PERMANENT  FILES 

EXTRACT  A  SOURCE  PROGRAM  FROM  TAPE 

PURGE  HIGH  CYCLE  WHILE  RETAINING  LOW  CYCLE 

PURGE  LOW  CYCLE  WHILE  RETAINING  HIGH  CYCLE 

CREATE  CERTAIN  PRINT  MESSAGE  (PM)  RECORDS 

ADD  ONE  PROCEDURE  TO  A  SEQUENTIAL  PROCEDURE  FILE 

LIST  PROCEDURE  NAMES,  PROCEDURE  HEADERS  AND  THE  PROCEDURES  IN 
A  SEQUENTIAL  PROCEDURE  FILE  (COMBINES  PRONAM,  PROHDR  AND 
PROLIST) 

DELETE  ONE  PROCEDURE  FROM  A  SEQUENTIAL  PROCEDURE  FILE 

LIST  DOCUMENTATION  FOR  PROCEDURES  PROADD,  PROALL,  PRODELE, 
PRODOC,  PROGET,  PROHDR,  PROLIST,  PRONAM,  PROREPL,  PROS2R 

GET  (EXTRACT)  ONE  PROCEDURE  FROM  A  SEQUENTIAL  PROCEDURE  FILE 

EXECUTE  A  CATALOGED  PROGRAM  (NOT  IN  A  LIBRARY) 

LIST  PROCEDURE  HEADERS  IN  A  PROCEDURE  FILE 

LIST  PROCEDURE (S)  IN  A  SEQUENTIAL  PROCEDURE  FILE 

LIST  NAMES  OF  PROCEDURES  IN  A  SEQUENTIAL  PROCEDURE  FILE 

REPLACE  ONE  PROCEDURE  IN  A  SEQUENTIAL  PROCEDURE  FILE 

CONVERT  SEQUENTIAL  PROCEDURE  FILE  TO  RANDOM  EDITLIB  USER 
LIBRARY 

PURGE  PERMANENT  FILES  OF  SPECIFIED  AC  AND  ID  (PUBLIC  FILES  OR 
ON  A  USER  DEVICE  SET) 


PURGEN 


GENERATE  PROCEDURE  'PUR'  TO  PURGE  SEVERAL  FILES  WITH  COMMON 
KERNEL 
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PURPOSE  DRIVER  TO  EXTRACT  PURPOSES  FROM  A  DOCUMENT  FILE 

PUTMS  TRANSFER  ONE  CDC  PERMANENT  FILE  (OF  EXECUTING  USER)  TO  THE 
MASS  STORAGE  SYSTEM  «  MSS 

RECADD1  ADD  ONE  OR  MORE  LOGICAL  RECORDS  TO  A  FILE 

RECDEL1  DELETE  ONE  OR  MORE  LOGICAL  RECORDS  FROM  A  FILE 

RECDOC  LIST  DOCUMENTATION  FOR  PROCEDURES  RECADD1,  RECDEL1,  RECDOC, 
RECGET1,  RECREP1 

RECGET1  EXTRACT  ONE  OR  MORE  LOGICAL  RECORDS  FROM  A  FILE 

RECREP1  REPLACE  ONE  OR  MORE  LOGICAL  RECORDS  IN  A  FILE 

RENAMAC  RENAME  AC  FIELD  ON  PERMANENT  FILES  OR  MASS  STORE  FILES 

RENAMID  RENAME  ID  ON  ALL  OF  ONE  USER'S  PERMANENT  FILES  (BY  COPYING 

THE  FILES) 

RUNBAS  COMPILE  AND  EXECUTE  BASIC  PROGRAM  (SIMILAR  TO  EDITOR  RUN, BAS 
FOR  USE  OUTSIDE  OF  EDITOR) 

RUNFTN  COMPILE  AND  EXECUTE  FTN  PROGRAM  (SIMILAR  TO  EDITOR  RUN, FTN 

FOR  USE  OUTSIDE  OF  EDITOR) 

RUNFTN5  COMPILE  AND  EXECUTE  FTN 5  PROGRAM  (SIMILAR  TO  EDITOR  RUN, FTN5 
FOR  USE  OUTSIDE  OF  EDITOR) 

RUNMNF  COMPILE  AND  EXECUTE  MNF  PROGRAM  UNDER  INTERCOM 
RUNPAS  COMPILE  AND  EXECUTE  PASCAL  PROGRAM  UNDER  INTERCOM 
RUNSEQ  COMPILE  AND  EXECUTE  FTN , SEQ  PROGRAM  (USES  TS  OPTION) 

RUNTS  COMPILE  AND  EXECUTE  FTN, TS  PROGRAM 
SEGLD  CREATE  A  SEGLOAD  ABSOLUTE  FILE 

SEGO  SEGLOAD  AND  EXECUTE  PROGRAM  WITH  OPTIONAL  LIBRARY 

SELDUMP  CREATE  BACKUP  DUMP  TAPE  OF  THE  USER  PERMANENT  FILES  OF  AN 
ACCOUNT  NUMBER 

SELLOAD  RESTORE  SELECTED  ROUTINES  FROM  A  BACKUP  DUMPF  TAPE 

SEND  SEND  MESSAGES  TO  AN  INTERCOM  USER  WHO  IS  NOT  LOGGED  IN; 

LIST  MESSAGES 

SORT  SORT  (SORTMRG)  UP  TO  5  'DISPLAY'  FIELDS  USING  'COBOL6' 

COLLATING  SEQUENCE  ('FILE'  CARDS  REQUIRED) 

SORTCZ  SORT  (SORTMRG)  UP  TO  5  'DISPLAY'  FIELDS  USING  'COBOL6' 

COLLATING  SEQUENCE  ('FILE'  CARDS  NOT  REQUIRED) 
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S2K260 

S2K280 

TAPRD 

TAPWR 

TIDBITS 
TP AUDIT 
TPGET 

TPRLS 

TRANPK 

UPDADD 

UPDDELE 

UPDDOC 

UPDGET 

UPDGETS 

UPDGETT 

UPDLIST 

UPDREPL 

UTILITY 

VENUS 

WHATLIB 


ATTACH  FILES  FOR  S2000  (VERSION  2.60)  NATURAL  LANGUAGE, 
FORTRAN,  OR  COBOL  PROCEDURAL  LANGUAGE  INTERFACE. 

ATTACH  FILES  FOR  S2000  (VERSION  2.80)  SELF-CONTAINED 
LANGUAGES,  REPORT  PROCESSOR,  FORTRAN  OR  COBOL  PROGRAMMING 
LANGUAGE  EXTENSION  (PLEX) . 

COPY  ONE  OR  MORE  FILES  FROM  A  FIXED  LENGTH,  BLOCKED  STRANGER 
TAPE  TO  DISK 

COPY  A  SEQUENTIAL  FILE  OR  AN  UPDATE  PL  ONTO  A  FIXED  LENGTH, 
BLOCKED  STRANGER  TAPE 

LIST  FILE  OF  TIDBITS  (HINTS  ON  IMPROVED  COMPUTER  USAGE) 

AUDIT  TAPES  ASSIGNED  TO  USER  INITIALS 

AUTOMATICALLY  OBTAIN  TAPES  FROM  THE  COMPUTER  CENTER'S  TAPE 
LIBRARY 

RELEASE  ASSIGNED  TAPES 

COPY  CONTENTS  FROM  ONE  DEVICE  SET  TO  ANOTHER  FOR  BACKUP 
ADD  ONE  DECK  TO  AN  UPDATE  LIBRARY 
DELETE  ONE  DECK  FROM  AN  UPDATE  LIBRARY 

LIST  DOCUMENTATION  FOR  PROCEDURES  UPDADD,  UPDDELE,  UPDDOC, 
UPDGET,  UPDLIST,  UPDREPL 

EXTRACT  ONE  DECK  FROM  AN  UPDATE  LIBRARY  (UPDATE, C)  AND, 

OPTIONALLY,  ADD  EDITOR  SEQUENCING 

EXTRACT  ONE  DECK  FROM  AN  UPDATE  LIBRARY  (UPDATE, S)  AND, 

OPTIONALLY,  ADD  EDITOR  SEQUENCING 

EXTRACT  ONE  DECK  FROM  AN  UPDATE  LIBRARY  (UPDATE, T)  AND, 

OPTIONALLY,  ADD  EDITOR  SEQUENCING 

LIST  DECK/COMDECK  NAMES  IN  UPDATE  LIBRARY  WITH  COUNT  OF 
RECORDS  IN  EACH  DECK/COMDECK 

REPLACE  ONE  DECK  IN  AN  UPDATE  LIBRARY 

EXECUTE  A  PROGRAM  ON  EDITLIB  USER  LIBRARY  'UTILITY' 

ATTACH  AND  EXECUTE  ONE  OF  THE  VENUS  RETRIEVAL  PROGRAMS 

LIST  LIBRARIES  SPECIFIED  IN  LAST  'LIBRARY'  COMMAND 


XEROX 


ROUTE  A  COPY  OF  A  FILE  TO  XEROX  8700 
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*****  PROCEDURE  DOCUMENTATION  ***** 

THIS  CHAPTER  CONTAINS  THE  MACHINE-READABLE  DOCUMENTATION  FOR  THE 
PUBLIC-ACCESS  PROCEDURES  IN  LIBRARIES  'PROCFIL',  ’I',  AND  ’MSS'. 

ALL  DOCUMENT  FILES  RESIDE  ON  THE  MASS  STORAGE  SYSTEM  (MSS) .  YOUR 
MSACCES  PASSWORD  MUST  BE  SUBMITTED  TO  THE  SYSTEM  BEFORE  DOCUMENTS  CAN 
BE  OBTAINED.  THIS  MAY  BE  DONE  WITH  A  SEPARATE  ’MSACCES’  COMMAND  OR  BY 
USING  THE  MSACCES  PARAMETER  IN  THE  BEGIN  STATEMENT. 


***  HOW  TO  PRINT  A  DOCUMENT  *** 

INDIVIDUAL  DOCUMENTS  MAY  BE  PRINTED  USING: 

BEGIN, DOCGET, .PROCFIL, ,<PROC>, OUTPUT, MSACCES«<PASSWORD>. 

WHERE  <PROC>  IS  THE  DESIRED  DOCUMENT. 

SEVERAL  DOCUMENTS  MAY  BE  PRINTED  AT  ONE  TIME  USING: 

BEGIN, DOCGET, .PROCFIL, , .OUTPUT, , ,<DOCS>,MSACCES-<PASSWORD> 

WHERE  <DOCS>  IS  A  FILE  CONTAINING  THE  NAMES  OF  THE  DESIRED  DOCUMENTS: 

<PR0C1 > , <PROC2> , . . . ,<PROCI> 

<PROCI+l>, . . . ,<PROCN> 

ALL  DOCUMENTS  MAY  BE  PRINTED  USING: 

BEGIN, DOCGET, .PROCFIL, , ALL, OUTPUT, MSACCES-<PASSWORD>. 

TO  PRINT  THE  DOCUMENT(S)  ON  THE  XEROX  8700,  EITHER: 

A)  ADD  ' FID“<FID> '  TO  THE  ' BEGIN , DOCGET . ' 

WHERE  <FID>  IS  THE  FILE  ID  FOR  THE  BANNER 

B)  USE 


BEGIN, XEROX, .OUTPUT, FID, .DOCPRT 


PROCEDURE  'ADDEXT' 


PURPOSE 

MODIFY  PRIVATE  PACK  DUM  FILE  FOR  LEVEL  508  DUMPF/LOADPF 

FUNCTIONAL  CATEGORIES:  Q4 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN , ADDEXT ,, VSN , SN , RD , MD , CN , EX , UTK . 

DESCRIPTION  OF  PARAMETERS 

VSN  -  PACK  VOLUME  SERIAL  NUMBER 

SN  -  PACK  SET  NAME 

RD.MD.CN  -  CURRENT  PASSWORDS  (FROM  PACK  INITIALIZATION) 

EX  -  PASSWORD  FOR  LOADPF  USE 

UTK  -  USER  TURNKEY  (IF  PASSWORD  IS  ON  PACK) 

DEFAULT  BEGIN  STATEMENT 
NO  MEANINGFUL  DEFAULT 

MAX  FL: 

REMARKS 

THE  SYSTEM  TURNKEY  PASSWORD  IS  REMOVED  FROM  DUM  FILE;  AN 
EXTEND  PASSWORD  IS  ADDED  TO  ALLOW  LOADPF  AT  OR  AFTER  LEVEL 
.  508  TO  RUN  ON  PACKS  INITIALIZED  AT  LEVEL  461  OR  BEFORE. 

ERROR  MESSAGES 

ADDEXT  MUST  BE  RUN  FROM  BATCH 

BECAUSE  ADDEXT  REQUIRES  USER  DEVICE  SETS.  IT  MUST  BE 
RUN  FROM  BATCH. 


AUTHOR 

SHARON  E  GOOD  -  DTNSRDC  CODE  1892.1 


DATE  WRITTEN:  09/19/80 
DATE (S)  REVISED 

02/14/84  -  ADD  TEST  TO  PROHIBIT  EXECUTION  FROM  INTERCOM 


ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, .ADDEXT, OUTPUT, MSACCES-<PASSWORD> . 
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PROCEDURE  'ANYLIB ' 

PURPOSE 

EXECUTE  A  PROGRAM  ON  ANY  EDITLIB  USER  LIBRARY 

FUNCTIONAL  CATEGORIES:  LO  Q3 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN , ANYLIB ,, LIB , ID , PROG , PAR AMS . 

DESCRIPTION  OF  PARAMETERS 

LIB  -  1-40  CHARACTER  LIBRARY  PFN 
ID  -  ID  IT  IS  CATALOGED  UNDER. 

(DEFAULT:  SYSTEM  PUBLIC- ACCESS  ID) 

USE  0  (ZERO)  IF  FILE  IS  ALREADY  ATTACHED 
AND  IS  TO  REMAIN  ATTACHED  AT  THE  END  OF  THE 
PROCEDURE. 

PROG  -  PROGRAM  TO  BE  EXECUTED 
PARAMS  -  UP  TO  13  PARAMETERS  FOR  'PROG' 

(KEYWORD  PARAMETERS  MUST  BE  $-DELIMITED,  E.G. , 
SOPT-LS . ) 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  DEPENDS  ON  PROGRAM  BEING  EXECUTED 

REMARKS 

SEE  ALSO  PROCEDURE  'PROGRAM'. 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  1975 

DATE (S)  REVISED 

03/01/78  -  CONVERT  TO  CCL 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, .ANYLIB, OUTPUT, MSACCES«<PASSWORD>. 
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PROCEDURE  'ANYPRO 


PURPOSE 

EXECUTE  A  PROCEDURE  ON  ANY  CATALOGUED  PROCEDURE  FILE 

FUNCTIONAL  CATEGORIES:  LO  Q3 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN , ANYPRO , , PFN , ID , PRO , PAR AMS . 

DESCRIPTION  OF  PARAMETERS 

PFN  -  PERMANENT  FILE  NAME  OF  PROCEDURE  FILE 

ID  -  ID  UNDER  WHICH  PFN  IS  CATALOGED 

PRO  -  PROCEDURE  NAME 

PARAMS  -  UP  TO  17  PARAMETERS  FOR  PROCEDURE  'PRO' 

(KEYWORD  PARAMETERS  MUST  BE  $~DELIMITED,  E.G., 
SOPT-LS.) 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

Max  FL:  DEPENDS  UPON  PROCEDURE  BEING  EXECUTED 

REMARKS 

SEE  ALSO  PROCEDURES  'ANYPROS',  ’LIBPRO',  ' LIBPROA ' ,  'MYPRO 1 , 
'MYPROS ' . 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  07/21/76 

DATE(S)  REVISED 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, .ANYPRO, OUTPUT, MSACCES-<PASSWORD> . 
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PROCEDURE  'ANYPROS' 


PURPOSE 

EXECUTE  A  PROCEDURE  ON  ANY  CATALOGUED  SEQUENTIAL  PROCEDURE 
FILE 

FUNCTIONAL  CATEGORIES:  LO  Q3 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

.  USAGE 

BEGIN , ANYPROS , , PFN , ID, PNAME , PAR AMS . 

DESCRIPTION  OF  PARAMETERS 

PFN  -  PERMANENT  FILE  NAME  OF  PROCEDURE  FILE 

ID  -  ID  UNDER  WHICH  IT  IS  CATALOGED 

PNAME  -  PROCEDURE  NAME 

PARAMS  -  UP  TO  17  PARAMETERS  FOR  PROCEDURE  'PRO' 

(KEYWORD  PARAMETERS  MUST  BE  $~DELIMITED,  E.G. , 
SOPT-LS.) 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  DEPENDS  UPON  PROCEDURE  BEING  EXECUTED 

REMARKS 

SEE  ALSO  PROCEDURES  'ANYPRO',  'LIBPRO',  ' LIBPROA' ,  'MYPRO ' , 
'MYPROS ' . 

AUTHOR 

DAVID  V. SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  10/29/79 

DATE (S)  REVISED 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, .ANYPROS, OUTPUT, MSACCES-<PASSWORD>. 
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PROCEDURE  ' ASCDOC 


PURPOSE 

PRINT  DOCUMENTS  FOR  ALL  ROUTINES  IN  THE  ASCII  PACKAGE 

FUNCTIONAL  CATEGORIES:  01  SO 

COMPUTERS  (OPERATING  SYSTEMS) 

CDC  6000/CYBER  170  (NOS/BE) 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

SYSTEM  PUBLIC-ACCESS  INTERACTIVE  PROCEDURE  FILE 

USAGE 

BEGIN , ASCDOC , , L , FID , LEFT , MSACCES . 

BEGIN, ASCDOC, I, <PARAMS>  <—  FOR  INTERACTIVE  VERSION 

BEGIN, ASCDOC, I,?  <—  FOR  INTERACTIVE  PROCESSING 

DESCRIPTION  OF  PARAMETERS 
L  -  LISTABLE  OUTPUT 

FID  -  FILE  ID  FOR  BANNER  FOR  XEROX 

(IF  OMITTED,  THE  DOCUMENTS  WILL  BE  IN  LOCAL  FILE 
<L>) 

LEFT  -  CENTERING 

OMITTED  OR  LEFT  -  LEFT- JUSTIFIED 
OTHER  -  CENTERED  ON  WIDE  PAPER 

MSACCES  -  MSACCES  PASSWORD 

(REQUIRED  ONLY  IF  NOT  ALREADY  SUBMITTED  IN  THIS 
BATCH  JOB  OR  INTERACTIVE  SESSION) 

DEFAULT  EXECUTE  STATEMENT 

BEGIN, ASCDOC, .OUTPUT, , LEFT. 

MAX  FL: 

REMARKS 

THE  PROCEDURE  DOES  A  BEGIN, DOCGET  ON  LIBRARIES  OTHER, 

PROCFIL  AND  NSRDC.  IF  FID  IS  SPECIFIED,  IT  DOES  A 
BEGIN, XEROX  TO  ROUTE  THE  DOCUMENTS. 

AUTHOR 

DAVID  V.  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  04/24/84 

DATE (S)  REVISED 

04/25/84  -  MAKE  INTERACTIVE 

08/30/84  -  PUT  INTERACTIVE  VERSION  INTO  INTEACTIVE  FILE 
-  PUT  NON-INTERACTIVE  VERSION  INTO  REGULAR  FILE 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, .ASCDOC, OUTPUT, MSACCES'<PASSWORD>. 
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PROCEDURE  'ASCI 10' 


PURPOSE 

CREATE  LABELLED  COMMON  BLOCKS  FOR  ASCII  PACKAGE 

FUNCTIONAL  CATEGORIES:  QO 

COMPUTERS  (OPERATING  SYSTEMS) 

CDC  6000/CYBER  170  (NOS/BE) 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC- ACCESS  PROCEDURE  FILE 

SYSTEM  PUBLIC-ACCESS  INTERACTIVE  PROCEDURE  FILE 

EXECUTE  STATEMENT 

BEGIN, ASCIIO, , ASC ,D63 , OMR , TEK, VT1 . 

BEGIN, ASCI 10, I , <PARAMS>  <—  FOR  INTERACTIVE  VERSION 

BEGIN, ASCIIO, I,?  <--  FOR  INTERACTIVE  PROCESSING 

DESCRIPTION  OF  PARAMETERS 
ASC  -  Y  FOR  /ASCII/ 

C  FOR  /ASCII/  WITH  *COMDECK  /ASCII 

D63  -  Y  FOR  /D630/ 

C  FOR  /D630/  WITH  *COMDECK  /D630 

N  TO  OMIT  THIS  COMMON  BLOCK 
OMR  -  Y  FOR  /OMRON/ 

C  FOR  /OMRON/  WITH  *COMDECK  /OMRON 

N  TO  OMIT  THIS  COMMON  BLOCK 
TEK  -  Y  FOR  /TEKTRN/ 

C  FOR  /TEKTRN/  WITH  *COMDECK  /TEKTRN 

N  TO  OMIT  THIS  COMMON  BLOCK 
VT1  -  Y  FOR  /VT100/ 

C  FOR  /VT100/  WITH  *COMDECK  /VT100 

N  TO  OMIT  THIS  COMMON  BLOCK 

DEFAULT  EXECUTE  STATEMENT 
BEGIN, ASCIIO, , Y,N,N,N,N. 

MAX  FL:  10000B 

REMARKS 

SEE  ALSO  SUBPROGRAMS  ASCADD,  ASCADM,  ASCBSX,  D630I,  ASCGET , 
ASCII,  ASCI II,  ASCLEN,  ASCPUT,  OMR ON I ,  TEKTRI ,  VT100I. 

OUTPUT  DESCRIPTION 

AT  THE  PRESENT,  FIVE  LABELLED  COMMON  BLOCKS  MAY  BE  CREATED: 
ASCII  -  NAMES  FOR  ASCII  CHARACTERS 
D630  -  NAMES  FOR  D630  CONTROL  CODES 

OMRON  -  NAMES  FOR  OMRON  CONTROL  CODES 
TEKTRN  -  NAMES  FOR  TEKTRONIX  CONTROL  CODES 
VT100  -  NAMES  FOR  DEC  VT100  CONTROL  CODES 
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AUTHOR 

DAVID  V.  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  03/14/84 

DATE (S)  REVISED 

04/26/84  -  MAKE  INTERACTIVE 

-  CHANGE  ALL  PARAMETERS 

05/21/84  -  CHANGE  /VT100/  FOR  NEW  DEFINITIONS  OF 
CUU,  CUD,  CUF,  CUB 

08/30/84  -  PUT  INTERACTIVE  VERSION  INTO  INTEACTIVE  FILE 

-  PUT  NON-INTERACTIVE  VERSION  INTO  REGULAR  FILE 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, , ASCI I 0, OUTPUT, MSACCES«<PASSWORD>. 
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PROCEDURE  'AUDIT 


PURPOSE 

SORTED  (FAST)  USER  AUDIT 

FUNCTIONAL  CATEGORIES:  QO  SO  Ml 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN , AUDI T ,, <KE YWORD-PARAMETERS> . 

DESCRIPTION  OF  PARAMETERS 

ALL  'AUDIT'  PARAMETERS  ARE  SUPPORTED  WITH  ONLY  THREE 
RESTRICTIONS: 

1)  MULTIPLE  ID’S  MUST  BE  $-DELIMITED  AND  LIMITED  TO  40 
CHARACTERS  (UP 'TO  7  ID'S).  WHEN  MULTIPLE  ID'S  ARE 
GIVEN,  A  SEPARATE  PARAMETER  'IDM-YES'  MUST  BE 
SPECIFIED.  FOR  EXAMPLE, 

BEGIN, AUDIT, ,ID-$ID1/ID2/ID3$,<0THER-PARAMS>, 
IDM-YES. 

2)  FOR  'AC' ,  USE  AC-AC. 

3)  IF  PF  IS  SPECIFIED,  IT  MUST  NOT  EXCEED  10  CHARACTERS. 
SORTING  IS  NOT  REALLY  NECESSARY  FOR  PF.  INSTEAD,  USE 

AUDIT, PF-<PFN>, _ 

IN  ADDITION,  UP  TO  8  FIELDS  MAY  BE  SORTED  (KEYWORDS  ARE  Sl- 
THRU  S8-): 

(A- ASCENDING,  D-DESCENDING) 

1A/1D  -  PF  NAME  -  ALL  SORTS 
2A/2D  -  CYCLE  -  ALL  SORTS 
3A/3D  -  ID  -  AC  SORT  ONLY 

4A/4D  -  ACCOUNT  -  ID  (AI-l)  OR 
SEG  -  AC-JJJJJJJJOO 
5A/5D  -  CREATED  -  AC  OR  ID  (AI-I) 

6A/6D  -  USED-ON  -  AC  OR  ID  (AI-I) 

7A/7D  -  //  USES  -  AC  OR  ID  (AI-I) 

8A/8D  -  //  PRUS  -  AC  OR  ID  (AI-I) 

PL-  MAY  BE  USED  TO  CHANGE  THE  'OUTPUT'  LINE  LIMIT. 

DEFAULT  BEGIN  STATEMENT 

BEGIN , AUDIT , , ID-<CHG~CRD/ LOGIN  ID> , LF-OUTPUT , S 1- 1A, S2-2D. 
WHEN  AC-JJJJJJJJOO  IS  SPECIFIED: 

BEGIN, AUDIT, , ID-<CHG-CRD/ LOGIN  ID> , LF-OUTPUT, S1-4A, S2-3A, 
S3-1A.S4-2D. 

MAX  FL:  52000B 

REMARKS 

NONE 


04/30/84 


2-9 


AUDIT 


1  OF  2 


AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  03/22/78 

DATE (S)  REVISED 

03/01/78  -  CONVERT  TO  CCL 

05/10/78  -  ADD  I DM  PARAMETER  FOR  MULTIPLE  ID’S 
05/26/78  -  REWRITE  VALIDATION  ROUTINE 
10/01/78  -  OLD  PROCEDURE  'AUDIT'  REMOVED. 

-  THIS  PROCEDURE  'FASTAUD'  RENAMED  'AUDIT'. 
12/18/78  -  ADD  SUPPORT  FOR  SN  PARAMETER 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, .AUDIT, OUTPUT, MSACCES=<PASSWORD>. 
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PROCEDURE  'BANNERS' 


PURPOSE 

PRINT  A  PAGE  WITH  1  TO  8  BANNERS 

FUNCTIONAL  CATEGORIES:  J4  QO 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN , BANNERS , , OUTPUT , NBANR , B 1 , B2 , B3 , B4 , B5 , B6 , B7 , B8 . 

DESCRIPTION  OF  PARAMETERS 
OUTPUT  -  LISTABLE  OUTPUT 
NBANR  -  NUMBER  OF  BANNERS  TO  PRINT  (0-8) 

(0  -  PROGRAM  WILL  DETERMINE  NUMBER  OF  BANNERS  AND 
ADD  DATE  AND  TIME  BANNERS,  IF  THERE  IS  ROOM) 
B1-B8  -  UP  TO  8  BANNERS  (1-10  CHARACTERS  EACH) 

THE  FOLLOWING  ARE  RECOGNIZED  FOR  ANY  BI: 

CPU  -  MACHINE  JOB  IS  RUNNING  ON 

DATE  -  CURRENT  DATE 

TIME  -  CURRENT  TIME 

DEFAULT  BEGIN  STATEMENT 

BEGIN, BANNER  S , , OUTPUT , 0 , CPU , DATE , TIME. 

MAX  FL:  34000B 

REMARKS 

1,  2,  3,  5,  AND  6  BANNERS  ARE  PRINTED  AT  6  LINES/INCH. 

4,  7  AND  8  BANNERS  ARE  PRINTED  AT  8  LINES/INCH  WITH  THE 
PRINTER  RESTORED  TO  6  LINES/INCH  AT  END-OF-PROCEDURE. 

AUTHORS 

GARY  L  STUMP  -  DTNSRDC  CODE  2731 
DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  03/22/78  -  GLS 

DATE(S)  REVISED 
06/23/78  -  DVS 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, .BANNERS, OUTPUT, MSACCES-<PASSWORD>. 
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PROCEDURE  1 BDT 


PURPOSE 

PRINT  A  BANNER  PAGE  WITH  DATE  AND  TIME 

FUNCTIONAL  CATEGORIES:  QO 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, BDT, .OUTPUT. 

DESCRIPTION  OF  PARAMETER 
OUTPUT  -  LI STABLE  OUTPUT 

DEFAULT  BEGIN  STATEMENT 
BEGIN, BDT,, OUTPUT. 

MAX  FL:  23000B 

REMARKS 

NONE 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  EARLY  1975 

DATE (S)  REVISED 

03/01/78  -  CONVERT  TO  CCL 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, , BDT, OUTPUT, MSACCES-<PASSWORD> . 
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PROCEDURE  'BIGLOAD' 


PURPOSE 

CREATE  AN  ABSOLUTE  FILE  WHICH  WILL  ALLOW  SOME  LARGE 
PROGRAMS  TO  LOAD  IN  LESS  CORE  THAN  NORMALLY  NEEDED 

FUNCTIONAL  CATEGORIES:  LO  Q3 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN , BIGLOAD , , PROGRAM , FL, LFN , ID, PW1 , PW2 . 

DESCRIPTION  OF  PARAMETERS 

PROGRAM  -  NAME  OF  USER'S  PROGRAM 

(THIS  WILL  ALSO  BE  THE  LFN  OF  THE  GENERATED  FILE) 
FL  -  AT  LEAST  EXACT  OCTAL  FIELD  LENGTH  REQUIRED  TO 

EXECUTE  THE  USER'S  PROGRAM 

(E.G. ,  60000  (THE  B  AT  THE  END  IS  NOT  SPECIFIED)) 
LFN  -  LFN  OF  USER'S  ABSOLUTE  PROGRAM 

(CANNOT  BE  THE  SAME  AS  <PROGRAM>) 

(IF  SPECIFIED,  THE  USER'S  PROGRAM  ON  <LFN>  IS 
COPIED  ONTO  NEW  FILE  <PROGRAM>  AFTER  THE  COMPASS 
PROGRAM) 

ID  -  IF  SPECIFIED,  FILE  <PROGRAM>  WILL  BE  CATALOGED 

WITH  PFN  OF  <PROGRAM>  UNDER  THIS  ID 
PW1.PW2  -  IF  ID  SPECIFIED,  THESE  ARE  PASSWORDS  FOR  THE 
CATALOG  (PW-) 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  47000B 

REMARKS 

BEFORE  EXECUTING  THIS  PROCEDURE,  THE  ABSOLUTE  USER’S  PROGRAM 
SHOULD  BE  ATTACHED  OR  CREATED  (WITH  AN  LFN  OTHER  THAN  THE 
PROGRAM  NAME) .  THIS  PROCEDURE  WILL  THEN  CREATE  A  NEW  FILE 
WITH  LFN  OF  <PROGRAM>  WHICH  CONTAINS  A  SHORT  COMPASS  PROGRAM 
FOLLOWED  BY  THE  USER'S  ABSOLUTE  PROGRAM. 

THE  LOADER  LOADS  THE  COMPASS  PROGRAM  WHICH  IN  TURN  LOADS  THE 
USER'S  PROGRAM. 

ERROR  MESSAGES 

FL  NOT  SPECIFIED 

FL  PARAMETER  MUST  BE  SPECIFIED 

PROGRAM  CANNOT  BE  SAME  AS  LFN 

PARAMETERS  1  AND  3  MUST  BE  DIFFERENT 

PROGRAM  NOT  SPECIFIED 

PROGRAM  PARAMETER  MUST  BE  SPECIFIED 
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EXAMPLE 

COMPILE  PROGRAM,  CREATE  AND  CATALOG  NEW  LOAD  FILE,  EXECUTE: 

ATTACH , I N , SOURCEPROGRAM , I D*XXXX .  SOURCE  FOR  <MYPROG> 

FTN,I-IN,OPT«1,L-0. 

*  LOAD, LGO.  OR  XEQ , LOAD” LGO , NOGO-ABS  (INTERCOM) 

*  NOGO, ABS. 

BEGIN , BIGLOAD, , MYPROG ,57000 , ABS , XXXX . 

MYPROG. 

*  NOTE:  IF  <MYPROG>  IS  AN  OVERLAY,  THE  ABSOLUTE  WILL  BE 
GENERATED  ON  THE  FILE  SPECIFIED  IN  THE  OVERLAY 
CARD.  THIS  LFN  MUST  BE  CHANGED  (USE 
BATCH, LFN1, RENAME, LFN2  IN  INTERCOM  OR  COPY  TO 
ANOTHER  FILE)  BEFORE  USING  BIGLOAD. 


AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 


DATE  WRITTEN:  11/09/77 

DATE (S)  REVISED 

03/01/78  -  CONVERT  TO  CCL 


ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, , PROCFIL , , BIGLOAD, OUTPUT , MSACCES“<PASSWORD> . 
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PROCEDURE  ' CALC3D ' 


PURPOSE 

THREE-D  PROCEDURE  FOR  CALCOMP  PLOTTERS 

FUNCTIONAL  CATEGORIES:  J5 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, CALC3D, , MAC, VSN1 , VSN2 , TID, INPUT, RERUN. 

DESCRIPTION  OF  PARAMETERS 
MAC  -  ONE  OF  — 

763  -  CALCOMP  763  PLOTTER 

936  -  CALCOMP  936  PLOTTER  (DEFAULT) 

170  -  CALCOMP  PLOTTER  ON  HIGH  SPEED  REMOTE 
TERMINAL 

VSNl  -  TAPE  DIEBOLD  OR  SLOT  NUMBER 
(6  CHARACTERS  OR  LESS) 

(UNLABELLED  TAPE  FOR  MAC-763; 

LABELLED  TAPE  FOR  MAC-936) 

VSN2  -  EXTERNAL  STICKER  LABEL 

(SLOT  TAPES  ONLY) 

TID  -  TERMINAL  ID  FOR  ROUTING  PLOTTER  OUTPUT 
(USED  ONLY  WHEN  MAC- 170) 

(DEFAULT:  012) 

INPUT  -  FILE  CONTAINING  CONTROL  CARDS 

RERUN  -  THIS  PARAMETER  FACILITATES  SAME  DAY  RERUN  USING 
THE  SAME  TAPE. 

OMITTED  OR  'W'  -  FIRST/ONLY  TIME  THIS  TAPE  IS  USED 
TODAY 

'R'  -  RERUN  ON  SAME  DAY 

THIS  PARAMETER  HAS  MEANING  ONLY  FOR  MAC-936. 

HOWEVER,  IF  SPECIFIED,  IT  MUST  BE  A  VALID  ENTRY. 

DEFAULT  BEGIN  STATEMENT 

BEGIN, CALC3D, , 936, *,*,012, INPUT, W. 

*  -  NO  DEFAULTS  FOR  THESE  PARAMETERS 

MAX  FL: 

REMARKS 

A  936  JOB  WILL  CREATE  A  LABELLED  TAPE  WITH  A  RETENTION 
PERIOD  OF  ONE  DAY.  SUBSEQUENT  RERUN (S)  ON  THE  SAME  DAY 
WILL  CAUSE  THE  JOB  TO  TERMINATE  BECAUSE  OF  UNEXPIRED  LABEL. 
SPECIFYING  RERUN-R  WILL  CAUSE  THE  CURRENT  LABEL  TO  BE 
CHECKED  RATHER  THAN  BE  RE-WRITTEN.  THE  FIRST  OR  ONLY 
RUN  SHOULD  OMIT  THE  RERUN  PARAMETER  SO  THAT  THE  CURRENT  DATE 
WILL  BE  WRITTEN  ON  THE  LABEL. 
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EXAMPLES 

BEGIN, CALC3D,, 936, CA9999. 

(USE  LABELLED  TAPE  CA9999  FOR  CALCOMP  936  PLOTTER) 

BEGIN , CALC 3D, , 763 , SLOTOl .MYTAPE . 

(USE  UNLABELLED  TAPE  IN  SLOT  01  HAVING  EXTERNAL 
LABEL  'MYTAPE'  FOR  CALCOMP  763  PLOTTER) 

AUTHOR 

SHARON  E  GOOD  -  DTNSRDC  CODE  1892.1 

DATE  WRITTEN:  EARLY  1975 

DATE (S)  REVISED 
07/23/76 

10/07/76  -  MAKE  TRANSPARENT  TO  USER 
03/01/78  -  CONVERT  TO  CCL 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, ,PROCFIL, ,CALC3D,0UTPUT,MSACCES=<PASSW0RD>. 
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PROCEDURE  ' CCNOTE ' 


PURPOSE 

PRINT  A  COMPUTER  CENTER  NOTE  OR  THE  CCN  INDEX 

FUNCTIONAL  CATEGORIES:  SO 

COMPUTERS  (OPERATING  SYSTEMS) 

CDC  6000/CYBER  170  (NOS/BE) 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN , CCNOTE , , OPT , OUTPUT , LEFT , PD, MSACCES . 

DESCRIPTION  OF  PARAMETERS 
OPT  -  OPTION.  ONE  OF: 

INDEX  -  BOTH  TOPIC  AND  NUMBER  INDICES 
NUMBER  -  INDEX  ORDERED  BY  CCN  NUMBER 
TOPIC  -  INDEX  ORDERED  BY  TOPIC 
VVNN  -  A  SPECIFIC  CCN,  WHERE 

VV  IS  THE  VOLUME  (2  DIGITS) 

NN  IS  THE  NUMBER  (2  DIGITS) 

OUTPUT  -  LISTABLE  OUTPUT 
LEFT  -  CENTERING 

LEFT  OR  OMITTED  -  LEFT- JUSTIFIED  ON  PAGE 

(WILL  FIT  ON  NARROW  PAPER) 
ANYTHING  ELSE  -  CENTERED  ON  WIDE  PAPER 
PD  -  PRINT  DENSITY  (FOR  OPT- INDEX /NUMBER /TOPIC  ONLY) 

8-8  LINES  PER  INCH 

6-6  LINES  PER  INCH  (REQUIRED  FOR  FICHE  OR  XEROX) 
MSACCES  -  YOUR  MSACCES  PASSWORD  (OPT-S/R/PM) 

(REQUIRED  ONLY  IF  IT  HAS  NOT  ALREADY  BEEN 
SUBMITTED  IN  THIS  BATCH  JOB  OR  INTERACTIVE 
SESSION) 

DEFAULT  BEGIN  STATEMENT 

BEGIN, CCNOTE, .INDEX, OUTPUT, L, 8. 

MAX  FL:  33000B 

REMARKS 

NONE 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 
DATE  WRITTEN:  07/10/80 
DATE (S)  REVISED 

03/15/83  -  CHANGE  FROM  USING  PROGDOC  TO  GETDOC 
09/23/83  -  CHANGE  FROM  PERMANENT  FILE  TO  MSS  FILE 

-  ADD  MSACCES  PARAMETER 

-  VALIDATE  OPT  PARAMETER 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, .CCNOTE, OUTPUT, MSACCES-<PASSWORD>. 
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PROCEDURE  ' COMQ 1 
PURPOSE 

PREPARE  AND  ROUTE  A  FILE  TO  THE  MICROFICHE  QUEUE 

FUNCTIONAL  CATEGORIES:  QO  JA 

COMPUTERS  (OPERATING  SYSTEMS) 

CDC  6000/CYBER  170  (NOS/BE) 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN , COMQ , , LFNPFN , ID , HEADER , F ID , PROG .SHIFT. 

DESCRIPTION  OF  PARAMETERS 

LFNPFN  -  LFN  OR  PFN  OF  FILE  TO  BE  LISTED 
(DEPENDS  ON  PARAMETER  ID) 

ID  -  IF  OMITTED,  LFNPFN  IS  AN  LFN 

IF  SPECIFIED,  LFNPFN  IS  A  PFN  CATALOGED 
UNDER  THIS  ID 

HEADER  -  0-  TO  32-CHARACTER  EYE-READABLE  HEADING  rOR 
THE  FICHE  (IF  ANY  NON-ALPHAMERIC  CHARACTERS, 

HEADER  MUST  BE  DOLLAR-DELIMITED: 

STHIS  HEADER  IS  DOLLAR-DELIMITED$) 

FID  -  FID  FOR  ROUTING  THE  FILE 

PROG  -  COM  PROGRAM  TO  USE.  MUST  BE  ONE  WHICH  SUPPORTS 

A  32-CHARACTER  EYE-READABLE  TITLE  IN  THE  SECOND 
LINE  OF  THE  FILE,  SUCH  AS: 

COMP  -  FOR  COMPILATION  AND  LOAD  MAP  LISTINGS 
(WILL  CREATE  AN  INDEX) 

(132  CHARACTERS  PER  LINE, 

268  PAGES  PER  FICHE, 

PLUS  2  INDEX  FRAMES) 

COMPF  -  SAME  AS  COMP,  WITH  A  BOX  AROUND  EACH 
FRAME 

COMQ  -  FOR  REGULAR  OUTPUT 

(132  CHARACTERS  PER  LINE, 

270  PAGES  PER  FICHE) 

COMQF  -  SAME  AS  COMQ,  WITH  A  BOX  AROUND  EACH 
FRAME 

(DEFAULT:  COMQ) 

SHIFT  -  NUMBER  OF  COLUMNS  TO  SHIFT  THE  OUTPUT 
0  -  NO  SHIFT 

(FILE  HAS  CARRIAGE  CONTROL  IN  COLUMN  1  OF 
EACH  RECORD,  SUCH  AS  A  COMPILATION  LISTING  OR 
PROGRAM  OUTPUT) 

1  -  SHIFT  1  POSITION  TO  THE  RIGHT 

(STANDARD  COPYSF;  USE  FOR  SOURCE  OR  DATA 
FILES) 

>1  -  SHIFT  SPECIFIED  NUMBER  OF  COLUMNS 
(DEFAULT:  0) 

•  DEFAULT  BEGIN  STATEMENT 

BEGIN, COMQ,,,,,, COMQ, 0. 

MAX  FL:  15000B 
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REMARKS 

THIS  PROCEDURE  CREATES  A  FILE  WHICH  CONTAINS: 

.  A  CARD-IMAGE  WITH  <PROG>  IN  COLUMNS  2-6 
.  A  CARD-IMAGE  WITH  <HEADER>  IN  COLUMNS  2-33 
.  THE  ENTIRE  FILE  IN  <LFNPFN>,  SHIFTED,  IF  SO  REQUESTED. 
<LFNPFN>  IS  REWOUND  BEFORE  AND  AFTER  IT  IS  COPIED. 

THIS  FILE  IS  ROUTED  TO  THE  MICROFICHE  QUEUE  USING: 

.  ROUTE, <FILE> , DC-PR , TID-C , FID=<FID> , FC-WW . 


EXAMPLES 

1)  FILE  ABCD.ID-ZYXW  IS  A  SOURCE  FILE  TO  BE  PUT  ONTO 
FICHE  WITH  AN  EYE-READABLE  TITLE  OF 

'PROGRAM  ABCD.ID-ZYXW  05/07/80’ 

OUTPUT,  WHICH  IS  TO  BE  CENTERED,  IS  TO  GO  TO  ZYXW: 

BEGIN, COMQ, ,ABCD,ZYXW, 

SPROGRAM  ABCD.ID-ZYXW  05/07/80$, ZYXW, ,26. 

2)  THE  DATA  IN  LOCAL  FILE  ' INDATA'  IS  TO  BE  PUT  ONTO  FICHE 
WITH  AN  EYE-READABLE  TITLE  'DATA  A/001  05/07/80' 

OUTPUT  IS  TO  GO  TO  XXXX: 

BEGIN, COMQ, .INDATA, , SDATA  A/001  05/07/80$ , XXXX, , 1 . 

3)  FILE  EFGH.ID-ZYXW  IS  A  LISTABLE  FILE  TO  BE  PUT  ONTO 
FICHE  WITH  AN  EYE-READABLE  TITLE  OF 

'FILE  EFGH,ID-ZYXW  05/07/80' 

OUTPUT  IS  TO  GO  TO  ZYXW: 

BEGIN, COMQ, ,EFGH, ZYXW, 

$FILE  EFGH.ID-ZYXW  05/07/80$, ZYXW. 

4)  THE  COMPILATION  IN  LOCAL  FILE  'OUT'  IS  TO  BE  PUT  ONTO 
FICHE  WITH  THE  EYE-READABLE  TITLE 

'PROGRAM  QRST  —  05/07/80' 

OUTPUT  IS  TO  GO  TO  XXXX,  FRAMES  ARE  TO  BE  OUTLINED  AND 
AN  INDEX  CREATED: 

BEGIN, COMQ, .OUT, ,$PROGRAM  QRST  —  05/07/80$ , XXXX, 
COMPF. 


AUTHORS 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2  (CDC  PROCEDURE  COMQ) 
BARBARA  DAVIS  -  DTNSRDC  CODE  1892.1  (COM  PROCEDURES) 

DATE  WRITTEN:  05/07/80 

DATE (S)  REVISED 

02/1A/8A  -  REWIND  <LFNPFN>  AFTER  COPYING 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, .COMQ, OUTPUT, MSACCES-<PASSWORD>. 
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PROCEDURE  ' COPYBLK 


PURPOSE 

REBLOCK  STRANGER  TAPES  TO  SCOPE  STANDARD  FILES  (BOTH 
UNBLOCKED  CARD  AND  PRINT  LINE  IMAGE  TAPES  AND  BLOCKED 
STRANGER  TAPES) 

FUNCTIONAL  CATEGORIES:  K4 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN , COPYBLK, , RB , MRL ,MBL, TAPE1 , TAPE2 . 

DESCRIPTION  OF  PARAMETERS 

RB  -  NUMBER  OF  RECORDS  PER  BLOCK 

IF  OMITTED  OR  1  -  COPY  UNBLOCKED  STRANGER 
TAPES  (CARD  AND  PRINT  LINE  IMAGES) 

OTHER  -  COPY  BLOCKED  STRANGER  TAPES 
MRL  -  MAXIMUM  RECORD  LENGTH  (RB  NOT  EQ  1) 

(NUMBER  OF  6-BIT  CHARACTERS) 

MBL  -  MAXIMUM  BLOCK  LENGTH  (RB  NOT  EQ  1) 

(TOTAL  NUMBER  OF  CHARACTERS  PER  BLOCK  (MUST 
BE  AT  LEAST  RB  TIMES  MRL)) 

TAPE1  -  INPUT  STRANGER  TAPE 

TAPE2  -  OUTPUT  SCOPE  STANDARD  FILE 

DEFAULT  BEGIN  STATEMENT 
IF  RB  OMITTED  OR  1: 

BEGIN, COPYBLK, ,1,150, 150, TAPE1 , TAPE2 . 

IF  RB  NOT  EQ  1: 

BEGIN , COPYBLK, , RB , 80 , * , TAPE1 , TAPE2 . 

(*  -  USER  MUST  SUPPLY) 

MAX  FL:  20000B 

REMARKS 

NONE 

EXAMPLES 

BEGIN, COPYBLK. 

(COPY  UNBLOCKED  TAPES) 

BEGIN, COPYBLK, , 10,MBL=800. 

(COPY  BLOCKED  CARD- IMAGE  TAPES,  10  RECORDS  PER 
BLOCK.  NOTE  THAT  USER  MUST  SUPPLY  MBL.) 
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AUTHOR 

SHARON  E  GOOD  -  DTNSRDC  CODE  1892.1 

DATE  WRITTEN:  EARLY  1975 

DATE (S)  REVISED 

10/07/76  -  REVERT (ABORT)  ADDED 
11/22/76  -  REW1.REW2  ADDED 
03/01/78  -  CONVERT  TO  CCL 
09/25/80  -  USE  COPYRM  INSTEAD  OF  FORM 

(THIS  VERSION  ADDED  TO  SYSTEM  ON  10/04/82) 
10/04/82  -  REMOVE  REW1.REW2  PARAMETERS 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, , PROCFIL , , COP YBLK , OUTPUT , MSACCES“<PASSWORD> . 


04/30/84 


2-21 


COPYBLK  -  1  OF 


PROCEDURE  'COPYLIB' 


PURPOSE 

CONDENSE  (AND  SORT)  AN  EDITLIB  USER  LIBRARY  PRESERVING  AL, 
FL,  FLO  VALUES.  BINDEX  AND  LISTBIN  LISTS  ARE  PROVIDED. 

FUNCTIONAL  CATEGORIES:  K3  Q7 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN , COPYLIB , , LIB , ID, OUTPUT , SORT , NOEDLST , AC , PW1 , PW2 . 

DESCRIPTION  OF  PARAMETERS 

LIB  -  PFN  OF  LIBRARY  (1-7  CHARACTERS) 

ID  -  ID  UNDER  WHICH  LIBRARY  IS  CATALOGED 

(DEFAULT:  SYSTEM  PUBLIC-ACCESS  ID) 

OUTPUT  -  LISTABLE  OUTPUT 

SORT  -  OMITTED  OR  'SORT'  -  SORT  ROUTINE  NAMES 

(NEW  LIBRARY  MAY  BE  REORDERED) 
ANYTHING  ELSE  -  DO  NOT  SORT 
NOEDLST  -  OMITTED  -  DO  NOT  PRINT  A  COPY  OF  EDITLIB 

OUTPUT 

ANYTHING  ELSE  -  PRINT  EDITLIB  OUTPUT 
AC  -  JOB  ORDER  NUMBER  FOR  CATALOG  OF  NEW  LIBRARY 

(MAY  BE  OMITTED) 

PW1.PW2  -  PASSWORDS  FOR  CATALOG  OF  NEW  LIBRARY 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  A6000B+ 

REMARKS 

THE  LOWEST  CYCLE  OF  LIB  IS  PURGED,  IF  POSSIBLE.  AT  LEAST  2 
CYCLES  ARE  ALWAYS  RETAINED. 

OCCASIONALLY,  EDITLIB  WILL  LOSE  A  PORTION  OF  A  DECK  DURING 
THE  COPY  PROCESS.  THE  DIRECTORY  WILL  SHOW  THAT  THE  DECK  IS 
THERE,  BUT  EXECUTING  IT  WILL  CAUSE  A  LOADER  ERROR.  FOR  THIS 
REASON,  THE  'LISTBIN'  LIST  IS  PROVIDED.  A  QUICK  EXAMINATION 
OF  THIS  LIST  WILL  SHOW  ANY  TROUBLE  SPOTS.  IN  ADDITION  TO 
THE  LINES  FOR  EACH  DECK  IN  THE  LIBRARY,  THERE  SHOULD  BE  SIX 
(6)  OTHER  LINES  (PRECEDED  BY  RIGHT  BRACKET  (] ) ) .  NORMALLY, 
THEY  ARE  AT  THE  END  OF  THE  LIBRARY,  BUT  MAY  BE  SPLIT  FOUR 
(A)  AT  THE  START  AND  TWO  (2)  AT  THE  END  OF  THE  LIBRARY. 

ONE  OR  MORE  '] '  LINES  ANYWHERE  ELSE  IN  THE  LISTBIN  LISTING 
INDICATES  WHERE  THE  BAD  DECK  IS.  THE  QUICKEST  WAY  TO 
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RESTORE  THE  'MISSING'  DECK  IS  AS  FOLLOWS: 

ATTACH, MYLIB, ID«XXXX,PW« _  (GET  CURRENT  CYCLE 

WITH  EXTEND  PERMISSION) 

ATTACH, LC, MYLIB, ID“XXXX , LC* 1 .  (GET  LOWEST  CYCLE) 

BEGIN, UTILITY, ,GETOBJ,LC, ROUTINE, FILE, LIB.  (EXTRACT 

ROUTINE) 

EDITLIB. 

EXTEND, MYLIB. 

<EOR> 

LIBRARY (MYLIB, OLD) 

REPLACE (*, FILE) 

FINISH. 

ENDRUN. 

"  6/7/8/9  EOF 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  11/18/76 

DATE (S)  REVISED 

03/01/78  -  CONVERT  TO  CCL 


ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, ,PROCFIL, , COP YL1B , OUTPUT ,MSACCES“<PASSWORD> . 
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PROCEDURE  'COPYS 


PURPOSE 

ATTACH,  EXECUTE  AND  RETURN  THE  RIQSCOPYS  PROGRAM 

FUNCTIONAL  CATEGORIES:  K1 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN , COPYS , , COPY , INPUT , OUTPUT , N . 

DESCRIPTION  OF  PARAMETERS 

COPY  -  ONE  OF  THE  'COPYS (COPY'  OPTIONS 
(SEE  REMARKS) 

INPUT  -  INPUT  FILE 

OUTPUT  -  OUTPUT  FILE 

N  -  NUMBER  OF  TIMES  OR  FILES 

DEFAULT  BEGIN  STATEMENT 

BEGIN , COP YS ,, COP Y , INPUT , OUTPUT , 1 . 

MAX  FL:  15000B 

REMARKS 

IF  RIQSCOPYS  IS  ALREADY  ATTACHED  (WITH  LFN  'COPYS'),  IT  WILL 
STILL  BE  ATTACHED  AFTER  THIS  PROCEDURE. 

A  DOCUMENT  DESCRIBING  COPYS  MAY  BE  PRINTED  BY: 

BEGIN, DOCGET, .OTHER, .COPYS, OUTPUT, MSACCES-<PW>. 

EXAMPLE 

REWIND  AND  COPY  A  RANDOM  FILE: 

ATTACH, RANIN, _  INPUT  RANDOM  FILE 

REQUEST, RANOUT, *PF.  OUTPUT  RANDOM  FILE 

BEGIN , COPYS ,, COP Y IX , RANIN , RANOUT . 

CATALOG, RANOUT, .... 

AUTHOR 

NORTHWESTERN  UNIVERSITY 

DATE  WRITTEN: 

DATE(S)  REVISED 

03/01/78  -  CONVERT  TO  CCL 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, , COPYS, OUTPUT, MSACCES-<PASSWORD>. 
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PROCEDURE  ' CV029 ' 


PURPOSE 

CONVERT  TO  029  PUNCH  CODE 

FUNCTIONAL  CATEGORIES:  J1  M2  01 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, CV029, ,LFN, TID, FID. 

DESCRIPTION  OF  PARAMETERS 

LFN  -  FILE  TO  BE  CONVERTED 

TID  -  ID  OF  TERMINAL  AT  WHICH  THE  029  DECK  IS  TO  BE 
PUNCHED.  USE  'C'  FOR  CENTRAL  SITE  OR  USE  THE 
3-CHARACTER  1700  TERMINAL  ID.  IF  OMITTED,  FILE 
' ZZZ029'  WILL  CONTAIN  THE  CONVERTED  DECK.  TO 
PUNCH,  USE 

ROUTE , ZZZ029 , DC-PU , EC-80COL , TID-<TID> , FID-*<FID> . 
FID  -  IF  TID  IS  SUPPLIED,  FID  IS  THE  1-  TO  5 -CHARACTER 
FILE-ID  TO  BE  USED.  IF  OMITTED,  THE  JOB/INTERCOM 
SESSION  NAME  IS  USED. 

DEFAULT  BEGIN  STATEMENT 
BEGIN, CV029, .INPUT. 

REMARKS 

NONE 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  10/17/78 

DATE (S)  REVISED 

07/25/79  -  ADD  FID  PARAMETER 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN , DOCGET , , PROCFIL , , CV029 , OUTPUT , MSACCES-<PASSWORD> . 
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PROCEDURE  'C2M' 


PURPOSE 

TRANSFER  ONE  CDC  PERMANENT  FILE  (OF  EXECUTING  USER)  TO  MASS 
STORAGE  SYSTEM  (BASED  ON  USER'S  CDC  FILE  TABLE/MFNPFN) 

FUNCTIONAL  CATEGORIES:  K1  QO 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE  FOR  MSS 

COMPUTERS  (OPERATING  SYSTEMS) 

CDC  6000/CYBER  170  (NOS/BE) 


USAGE 

BEGIN,C2M,MSS,TBLTK,PFN,NA,CT,M,PW,XR,TK,RD. 


DESCRIPTION  OF  PARAMETERS 

TBLTK  -  TK  PASSWORD  FOR  TABLE/MFNPFN 

PFN  -  CDC  PERMANENT  FILE  TO  BE  TRANSFERRED 

NA 

-  OVERWRITE  FOR  MSS 

* 

CT 

-  CATEGORY  TYPE  FOR  MSS 

* 

M 

-  PERMISSION  MODE  FOR  MSS 

* 

PW 

-  PASSWORD  FOR  MSS 

* 

XR 

-  XR  PASSWORD  FOR  CDC  PERMANENT  FILE 

TK 

-  TK  PASSWORD  FOR  CDC  PERMANENT  FILE 

** 

RD 

-  RD  PASSWORD  FOR  CDC  PERMANENT  FILE 

** 

(*  ~ 

IF  OMITTED,  TAKEN  FROM  TABLE/MFNPFN.  IF 
TABLE/MFNPFN,  NA-O,  CT-P,  M-R,  PW-O. 

INVALID  IN 

**  -  IF  OMITTED,  TAKEN  FROM  TABLE/MFNPFN.) 

DEFAULT  BEGIN  STATEMENT 
BEGIN, C2M, MSS, 

(*  -  USER  MUST  SUPPLY) 

MAX  FL:  26000B 

REMARKS 

A  FILE  RELATING  MFN  TO  PFN  MUST  BE  CREATED  BY  THE  USER  AND 
CATALOGED  WITH  CDC  PERMANENT  FILE  NAME  'TABLE/MFNPFN'  UNDER 
THE  EXECUTING  USER'S  ID.  IT  SHOULD  HAVE  A  TK  PASSWORD.  THE 
FILE  FORMAT  IS  DESCRIBED  BELOW. 

THIS  PROCEDURE  EXECUTES  UTILITY  PROGRAM  'XFRC2M' . 

THE  CDC  PERMANENT  FILE  IS  NOT  PURGED. 

SEE  ALSO  PROCEDURES  'PUiMS',  'C2MALL' ;  'GETMS ' ,  'M2C' , 

'M2CALL' . 

PROCEDURE  'MSTABLE'  MAY  BE  USED  TO  CREATE/EXPAND  A  TABLE. 
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DATA  CARDS  IN  FILE  TABLE/MFNPFN , ID-<USER  ID> 
COL  CONTENTS 


3-9 

11-12 

1A 

16-22 

2A 

26-65 

67-75 

77-85 

87-95 

97-106 


FLAG 

BLANK 


BLANK  -  DATA  CARD 
NON-BLANK  -  COMMENT  CARD 

MFN 

DEFAULT  CT 
DEFAULT  M 
DEFAULT  PW 
DEFAULT  NA 
PFN 

(THE  PROGRAM  WILL  PUT  $...$  AROUND  EACH  PFN) 

DEFAULT  XR  PASSWORD 

DEFAULT  TK  PASSWORD 

DEFAULT  RD  PASSWORD 

DEFAULT  AC  (JOB  ORDER  NUMBER) 


ERROR  MESSAGES  (PROCEDURE  C2M) 

C2M  REQUIRES  PFN  PARAMETER 
SELF-EXPLANATORY 

ERROR  MESSAGES  (PROGRAM  XFRC2M) 

CT  INVALID  -  MUST  BE  P,  PU,  S  OR  OMITTED 
SELF-EXPLANATORY 

M  INVALID  -  MUWT  BE  R,  S  OR  OMITTED 
SELF-EXPLANATORY 

NA  INVALID  -  MU IT  BE  0,  S  OR  OMITTED 
SELF-EXPLANATORY 

PFN  MUST  BE  SPECIFIED 
SELF-EXPLANATORY 

PW  TOO  LONG  -  7  CHAR  MAX 
SELF-EXPLANATORY 

RD  TOO  LONG  -  9  CHAR  MAX 
SELF-EXPLANATORY 

TBLTK  TOO  LONG  -  9  CHAR  MAX 
SELF-EXPLANATORY 

TK  TOO  LONG  -  9  CHAR  MAX 
SELF-EXPLANATORY 

UNABLE  TO  ATTACH  TABLE/MFNPFN 
<REASON> 

SHOULD  BE  SELF-EXPLANATORY 

UNRECOGNIZED  PARAMETER  #  <N>  (<PARAMETER>)  IGNORED 
UNRECOGNIZED  EXECUTE  PARAMETER.  IGNORED. 
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ERROR  MESSAGES  (GENERATED  PROCEDURE  XC2M) 

CDC  PERM  FILE 
<PFN> 

ID-<YOUR  ID> 

STORED  ON  MSS  AS  <MFN> 

TRANSFER  WAS  SUCCESSFUL 

ATTACH  OF 
<PFN> 

ID=<YOUR  ID> 

OR  MSSTORE  AS  <MFN>  • 

FAILED. - 

PREVIOUS  SYSTEM  MESSAGES  SHOULD  IDENTIFY  THE  PROBLEM 

EXAMPLES 

1)  TRANSFER  YOUR  CDC  PERMANENT  FILE  1 ABCDE 1  TO  MSS  USING  THE 
VALUES  FOR  CT,  M,  PW,  NA  SPECIFIED/IMPLIED  IN  THE  FILE 
TABLE/MFNPFN, ID»<YOUR  ID>: 

BEGIN , C2M , MSS , MYTBLTK , ABCDE . 

2)  TRANSFER  YOUR  CDC  PERMANENT  FILE  'A/B/C'  HAVING  TURNKEY 
PASSWORD  'MYTK'  TO  MSS  MAKING  IT  A  PUBLIC,  READ/WRITE 
FILE  WITH  PASSWORD  'DEF' ,  OVERWRITING  ANY  PREVIOUS  MSS 
COPY  OF  THE  FILE: 

BEGIN , C2M , MSS , MYTBLTK , $A/B/C$ , 1 , PU , W , DEF , MYTK . 


AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  01/13/82 

DATE (S)  REVISED 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, ,PROCFIL, , C2M, OUTPUT, MSACCES-<PASSWORD> . 
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PROCEDURE  ' C2MALL ' 


PURPOSE 

TRANSFER  ALL  CDC  PERMANENT  FILES  (OF  EXECUTING  USER)  TO  MASS 
STORAGE  SYSTEM  (BASED  ON  USER'S  CDC  FILE  TABLE/MFNPFN) 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE  FOR  MSS 

COMPUTERS  (OPERATING  SYSTEMS) 

CDC  6000/CYBER  170  (NOS/BE) 

FUNCTIONAL  CATEGORIES:  K1  QO 

USAGE 

BEGIN , C2MALL , MSS , TBLTK , PW 1 , PW2 ,PW3,NA,CT,M,PW. 

DESCRIPTION  OF  PARAMETERS 

TBLTK  -  TK  PASSWORD  FOR  TABLE/MFNPFN 

PW1-PW3  -  PASSWORDS  ON  CDC  PERMANENT  FILES  * 


NA 

-  OVERWRITE  FOR  MSS 

•/rrt 

CT 

-  CATEGORY  TYPE  FOR  MSS 

M 

-  PERMISSION  MODE  FOR  MSS 

** 

PW 

-  PASSWORD  FOR  MSS 

** 

(*  -  IF  PW1  IS  OMITTED,  PW2-PW3  ARE  IGNORED  AND  THE  XR,  TK 

AND  RD  PASSWORDS  ARE  TAKEN  FROM  TABLE/MFNPFN. 

**  -  IF  OMITTED,  TAKEN  FROM  TABLE/MFNPFN.) 

DEFAULT  BEGIN  STATEMENT 
NO  MEANINGFUL  DEFAULTS 

MAX  FL:  26000B 

REMARKS 

A  FILE  RELATING  MFN  TO  PFN  MUST  BE  CREATED  BY  THE  USER  AND 
CATALOGED  WITH  CDC  PERMANENT  FILE  NAME  ’TABLE/MFNPFN’  UNDER 
THE  EXECUTING  USER'S  ID.  IT  SHOULD  HAVE  A  TK  PASSWORD.  THE 
FILE  FORMAT  IS  DESCRIBED  BELOW. 

THIS  PROCEDURE  EXECUTES  UTILITY  PROGRAM  ’XFRC2MA' . 

THE  CDC  PERMANENT  FILES  ARE  NOT  PURGED.  PROCEDURE  'PURGALL' 
MAY  BE  USED  FOR  THIS  PURPOSE. 

SEE  ALSO  PROCEDURES  'PUTMS',  'C2M' ;  ’ GETMS ' ,  'M2C ' , 

'M2CALL ' . 

PROCEDURE  'MSTABLE'  MAY  BE  USED  TO  CREATE/EXPAND  A  TABLE. 
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DATA  CARDS  IN  FILE  TABLE/MFNPFN, ID«<USER  ID> 
COL  CONTENTS 


3-9 

11-12 

J4 

16-21 

24 

26-65 

67-75 

77-85 

87-95 

97-106 


FLAG 

BLANK  -  DATA  CARD 
NON-BLANK  -  COMMENT  CARD 
MFN 

DEFAULT  CT 
DEFAULT  M 
DEFAULT  PW 
DEFAULT  NA 
PFN 

(THE  PROGRAM  WILL  PUT  $...$  AROUND  EACH  PFN) 

DEFAULT  XR  PASSWORD 

DEFAULT  TK  PASSWORD 

DEFAULT  RD  PASSWORD 

DEFAULT  AC  (JOB  ORDER  NUMBER) 


ERROR  MESSAGES  (PROGRAM  XFRC2MA) 

CT  INVALID  -  MUST  BE  P,  PU,  S  OR  OMITTED 
SELF-EXPLANATORY 

M  INVALID  -  MUST  BE  R,  W  OR  OMITTED 
SELF-EXPLANATORY 

NA  INVALID  -  MUST  BE  0,  1  OR  OMITTED 
SELF-EXPLANATORY 

PW  TOO  LONG  -  7  CHAR  MAX 
SELF-EXPLANATORY 

PW1  TOO  LONG  -  9  CHAR  MAX 
SELF-EXPLANATORY 

PW2  TOO  LONG  -  9  CHAR  MAX 
SELF-EXPLANATORY 

PW3  TOO  LONG  -  9  CHAR  MAX 
SELF-EXPLANATORY 

UNABLE  TO  ATTACH  TABLE/MFNPFN 
<REASON> 

SHOULD  BE  SELF-EXPLANATORY 

UNRECOGNIZED  PARAMETER  #  <N>  (<PARAMETER>)  IGNORED 
UNRECOGNIZED  EXECUTE  PARAMETER.  IGNORED. 


W*. 
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EXAMPLES 

1)  TRANSFER  YOUR  CDC  PERMANENT  FILES  TO  MSS  USING  VALUES  FOR 
CT,  M,  PW,  NA,  TK,  RD  SPECIFIED/IMPLIED  IN  THE  FILE 
TABLE/MFNPFN, ID“<YOUR  ID>: 

BEGIN, C2MALL. 

2)  TRANSFER  YOUR  CDC  PERMANENT  FILES  (HAVING  SOME  PASSWORDS) 
TO  MSS,  OVERWRITING  ANY  EXISTING  MSS  COPIES  OF  THE  FILES, 

BEGIN , C2MALL , MSS , 1 , PW1-TKL , PW2-RD1 , PW3-TK2 , PW4-TK3 . 


-OR- 


BEGIN , C2MALL ,MSS , 1 , , , , TK1 , RD1 , TK2 , TK3 . 


AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  01/13/82 

DATE(S)  REVISED 

02/25/82  -  ADD  TBLTK  PARAMETER 

-  REMOVE  PW4,  PW5  PARAMETERS  BECAUSE  THE  EXECUTE 
STATEMENT  FOR  XFRC2MA  IS  MONGER  THAN  80  COLUMNS 
WITH  THEM 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, ,C2MALL, OUTPUT, MSACCES-<PASSWORD>, 
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PROCEDURE  'DISPOST 


PURPOSE 

INVOKE  DISSPLA  POSTPROCESSORS  (TEK300  OR  TEK480) 

FUNCTIONAL  CATEGORIES:  LO  Q3 

COMPUTERS  (OPERATING  SYSTEMS) 

CDC  6000/CYBER  170  (NOS/BE) 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN , DISPOST ,, WHICH , PFN , ID , PWl , PW2 . 

DESCRIPTION  OF  PARAMETERS 

WHICH  -  DESIRED  POSTPROCESSOR:  ONE  OF: 

TEK300 

TEK480 

PFN  -  NAME  OF  THE  COMPRESSED  PLFILE 

(THE  PROCEDURE  FIRST  TRIES  TO  ATTACH  A  FILE  HAVING 
'COMPRESSED'  SUFFIXED  TO  <PFN>,  I.E., 

< P FN >_COMPRES S ED .  IF  THIS  FILE  DOES  NOT  EXIST, 
THEN  THE  PFN  IS  ASSUMED  TO  BE  JUST  <PFN>.) 

ID  -  ID  UNDER  WHICH  <PFN>  IS  CATALOGED  (REQUIRED) 

PW1.PW2  -  RD  AND  TK  PASSWORDS  (IF  ANY)  FOR  <PFN> 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL: 

REMARKS 

WHEN  TEK480  IS  USED,  THE  SCREEN (80, 66)  IS  SET  AUTOMATICALLY. 

ERROR  MESSAGES 

ID  MUST  BE  SPECIFIED 
SELF-EXPLANATORY 

INVALID  POSTPROCESSOR  (<WHICH>) 

<WHICH>  IS  THE  INVALID  USER  ENTRY.  ONLY  TEK300  AND 
TEK480  ARE  SUPPORTED. 

PLFILE  IS  <PFN>COMPRESSED, ID=<ID>  -OR- 
PLFILE  IS  <PFN>,ID-<ID> 

NAME  OF  PLFILE  BEING  USED 

SCREEN (80,66)  DEFINED 

A  REMINDER  OF  THE  SCREEN  CHANGE  WHEN  TEK480  IS  USED. 
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AUTHOR 

ED  ZIVI  -  DTNSRDC  CODE  2731 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  LATE  1979  (EZ) 

DATE(S)  REVISED 

01/29/80  -  DVS  -  CHANGE  TO  A  PUBLIC-ACCESS  PROCEDURE 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, , DISPOST, OUTPUT, MSACCES-<PASSWORD> . 


04/30/84 


2-33 


DISPOST  -  2  OF  2 


PROCEDURE  'DOCADD 


PURPOSE 

ADD  ONE  DOCUMENT  TO  A  DOCUMENTATION  FILE 

FUNCTIONAL  CATEGORIES:  Q6 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN , DOCADD , , LIB , ID, PROG , AFTER , LFN , AC , PW1 , PW2 , PW3 , PW4 , PW5 . 

DESCRIPTION  OF  PARAMETERS 

LIB  -  FIRST  PART  OF  DOCUMENTATION  FILE  PFN 
(FULL  PFN  IS  L I B_DOCUMENTAT ION) 

ID  -  ID  UNDER  WHICH  IT  IS  CATALOGED 

(DEFAULT:  SYSTEM  PUBLIC-ACCESS  ID) 

PROG  -  NAME  OF  DOCUMENT  TO  BE  ADDED 

AFTER  -  NAME  OF  DOCUMENT  AFTER  WHICH  THIS  DOCUMENT  IS  TO 

BE  PLACED 

(IF  BLANK,  WILL  GO  IN  ALPHABETICAL  ORDER. 

IF  ’O',  WILL  GO  AT  START  OF  FILE. 

IF  'END',  WILL  GO  AT  END  OF  FILE.) 

LFN  -  LFN  OF  FILE  CONTAINING  NEW  DOCUMENT. 

IT  IS  REWOUND  BEFORE  BEING  READ.  IT  MUST  NOT 
CONTAIN  A  *DECK  CARD. 

AC  -  JOB  ORDER  NUMBER  FOR  CATALOG 

(MAY  BE  OMITTED) 

PW1-PW5  -  PASSWORDS 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  31000B 

REMARKS 

THE  LOWEST  CYCLE  OF  L I B_DOCUMENTAT I ON  IS  PURGED,  IF 
POSSIBLE.  AT  LEAST  2  CYCLES  ARE  ALWAYS  RETAINED. 

EXAMPLES 

ASSUME  THE  OLD  DOCUMENT  FILE  WAS  CATALOGED  WITH: 

CATALOG , FILE , MYDOCUMENTAT ION , ID=XXXX , XR=RONLY . 

AND  HAS  DOCUMENTS:  A,  B,  D,  F,  G,  H. 

TO  ADD  DOCUMENT  C  (ON  LFN  CC)  IN  ALPHABETICAL  ORDER: 

BEGIN, DOCADD, ,MY,XXXX,C, ,CC, ,RONLY. 

THE  NEW  DOCUMENT  FILE  WILL  HAVE:  A,  B,  C,  D,  F,  G,  H. 

TO  ADD  DOCUMENT  C  (ON  LFN  CC)  AT  START  OF  THE  FILE: 

BEGIN, DOCADD, ,MY,XXXX,C,0,CC, ,RONLY. 

THE  NEW  DOCUMENT  FILE  WILL  HAVE:  C,  A,  B,  D,  F,  G,  H. 

TO  ADD  THE  DOCUMENT  C  (ON  LFN  CC)  AT  THE  END  OF  THE  FILE: 

BEGIN , DOCADD, ,MY , XXXX , C , END, CC , RONLY . 

THE  NEW  DOCUMENT  WILL  HAVE:  A,  B,  D,  F,  G,  H,  C. 
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TO  ADD  THE  DOCUMENT  C  (ON  LFN  CC)  AFTER  DOCUMENT  F: 

BEGIN, DOCADD, ,MY,XXXX,C, F,CC, .RONLY. 

THE  NEW  DOCUMENT  FILE  WILL  HAVE:  A,  B,  D,  F,  C,  G,  H. 

SUGGESTED  COMPLETE  SEQUENCE  OF  OPERATIONS  FOR  CREATING  A 
DOCUMENT  (USING  DOC  AND  EDITOR)  AND  ADDING  IT  TO  AN  EXISTING 
DOCUMENT  FILE: 

CONNECT, OUTPUT 

ATTACH, UTILITY. 

LIBRARY, UTILITY. 

DOC.  (OR  MTDOC.  OR  PFDOC.) 

(CREATE  DOCUMENT  IN  FILE  ' DOCMNT ' ) 

’EDITOR 

EDIT, DOCMNT, SEQ 

(MODIFY,  IF  NECESSARY.  INDICATE  START  OF  EACH  PAGE 
BY  PUTTING  A  ’ 1’  IN  COLUMN  1  OF  EACH  LINE  WHICH  IS  TO 
BE  THE  FIRST  LINE  OF  A  PAGE.) 

SAVE , NEWDOC , NOSEQ 

LINER, NEWDOC. 

(WILL  COUNT  PAGES  AND  LINES  PER  PAGE.  IF  ANY  PAGE  HAS 
MORE  THAN  59  LINES,  GO  BACK  AND  RESTRUCTURE  THE 
DOCUMENT.) 

BYE 

DOCIT, NEWDOC, FILE. 

(WILL  LENGTHEN  EACH  PAGE  TO  60  LINES  ADDING  THE  DATE, 
DOCUMENT  NAME  AND  PAGE  COUNTS.) 

BEGIN, DOCADD, ,MYLIB,XXXX,DOCNAME, ,FILE, , RONLY. 

(WILL  ADD  THE  DOCUMENT  JUST  CREATED  (ON  LFN  'FILE')  TO 
THE  DOCUMENT  FILE  WITH  PFN'MYLIBDOCUMENTATION , 
ID*=XXXX,  IN  ALPHABETICAL  ORDER  ACCORDING  TO  THE 
SPECIFIED  DOCUMENT  NAME  'DOCNAME'.  ALPHABETICAL 
ORDER  IS  RECOMMENDED  SO  THAT  LISTS  OF  THE  CONTENTS 
WILL  BE  MORE  READABLE.) 

BEGIN, DOCLIST, , MYLIB ,XXXX,OUT. 

(GET  A  LIST  OF  DOCUMENT  NAMES  WITH  NUMBER  OF  CARDS, 
LINES  AND  PAGES  FOR  EACH.) 

PROGDOC .MYLIB , XXXX , DOCNAME , OUT . 

(LIST  THE  DOCUMENT  FROM  THE  DOCUMENT  FILE  TO  VERIFY  IT 
WAS  ADDED  PROPERLY.) 

BANNER, END, OUT. 

(TO  KEEP  THE  SYSTEM  FROM  PRINTING  "END  OF  LIST" 
MESSAGES  ON  LAST  PAGE  OF  DOCUMENT.) 

ROUTE, OUT, DC-PR, _ 

(PRINT  THE  LISTS  ON  ANY  AVAILABLE  PRINTER.) 


AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 


DATE  WRITTEN:  02/01/76 
DATE (S)  REVISED 

03/01/78  -  CONVERT  TO  CCL;  INCREASE  TO  5  PASSWORDS 


ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, .DOCADD, OUTPUT, MSACCES-<PASSWORD>. 
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PROCEDURE  1 DOCDATE 1 


PURPOSE 

LIST  DOCUMENT  NAMES  (ON  *DECK  CARDS)  TOGETHER  WITH  THE 
DOCUMENT  DATE  AND  PAGE  NUMBERS  (FROM  BOTTOM  LINE  OF  EACH 
PAGE) 

FUNCTIONAL  CATEGORIES:  01 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, DOCDATE, , LIB, ID, OUTPUT, PW1 , PW2, PW3, PW4 , PW5 . . 

DESCRIPTION  OF  PARAMETERS 

LIB  •  -  FIRST  PART  OF  PFN 

(FULL  PFN  IS  P FN_DOCUMENTAT ION) 

ID  -  ID  UNDER  WHICH  IT  IS  CATALOGED 

(DEFAULT:  SYSTEM  PUBLIC-ACCESS  ID) 

OUTPUT  -  LISTABLE  OUTPUT 

PW1-PW5  -  PASSWORDS  FOR  ATTACHING  THE  DOCUMENTATION  FILE 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  32000B 

REMARKS 

NONE 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  02/05/80 

DATE (S)  REVISED 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN , DOCGET , , PROCFIL , .DOCDATE , OUTPUT , MSACCES«<PASSWORD> . 
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PROCEDURE  1 DOCDELE ' 


PURPOSE 

DELETE  ONE  DOCUMENT  FROM  A  DOCUMENTATION  FILE 

FUNCTIONAL  CATEGORIES:  Q6 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN , DOCDELE , , LIB , ID, PROG , AC , PW1 , PW2 , PW3 , PW4 , PW5 . 

DESCRIPTION  OF  PARAMETERS 

LIB  -  FIRST  PART  OF  DOCUMENTATION  FILE  PFN 
(FULL  PFN  IS  LIB  DOCUMENTATION) 

ID  -  ID  UNDER  WHICH  IT  IS  CATALOGED 

(DEFAULT:  SYSTEM  PUBLIC-ACCESS  ID) 

PROG  -  NAME  OF  DOCUMENT  TO  BE  DELETED 

AC  -  JOB  ORDER  NUMBER  FOR  CATALOG 

(MAY  BE  OMITTED) 

PW1-PW5  -  PASSWORDS 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  31000B 

REMARKS 

THE  LOWEST  CYCLE  OF  L I B_DOCUMENTAT I ON  IS  PURGED,  IF 
POSSIBLE.  AT  LEAST  2  CYCLES  ARE  ALWAYS  RETAINED. 

EXAMPLES 

ASSUME  THE  OLD  DOCUMENT  FILE  WAS  CATALOGED  WITH: 

CATALOG, FILE, M YDOCUMENTAT I ON , ID=XXXX,XR=RONLY. 

AND  HAS  DOCUMENTS:  A,  B,  D,  F,  G,  H. 

TO  DELETE  DOCUMENT  G: 

BEGIN , DOCDELE , , MY , XXXX , G , , RONL Y . 

THE  NEW  DOCUMENT  FILE  WILL  HAVE:  A,  B,  D,  F,  H. 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 
DATE  WRITTEN:  02/01/76 
DATE (S)  REVISED 

03/01/78  -  CONVERT  TO  CCL;  INCREASE  TO  5  PASSWORDS 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, ,PROCFIL, , DOCDELE, OUTPUT, MSACCES-<PASSWORD> . 
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PROCEDURE  ' DOCDOC ' 

PURPOSE 

LIST  DOCUMENTATION  FOR  PROCEDURES  DOCADD,  DOCDATE ,  DOCDELE , 
DOCDOC,  DOCFILE,  DOCGET,  DOCL1ST,  DOCREPL 

FUNCTIONAL  CATEGORIES:  01 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN , DOCDOC , , OUTPUT , LEFT . 

DESCRIPTION  OF  PARAMETERS 
OUTPUT  -  LISTABLE  OUTPUT 

LEFT  -  OMITTED  -  PRINT  LEFT- JUSTIFIED  ON  PAGE 
NON-BLANK  -  PRINT  CENTERED  ON  WIDE  PAGE 

DEFAULT  BEGIN  STATEMENT 
BEGIN , DOCDOC , , OUTPUT . 

MAX  FL:  25000B 

REMARKS 

A  BANNER  PAGE  PRECEDES  THE  LIST  AND  CONTAINS  THE  WORD 
'DOCDOC'.  A  BANNER  PAGE  WITH  THE  WORD  'END'  FOLLOWS  THE 
LIST. 


K. 
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AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  02/10/77 

DATE (S)  REVISED 

03/01/78  -  CONVERT  TO  CCL 

02/05/80  -  ADD  PROCEDURE  DOCDATE  TO  LIST 

05/17/83  -  USE  PROGRAM  GETDOC  INSTEAD  OF  MANYDOC 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, .DOCDOC, OUTPUT, MSACCES-<PASSWORD> . 


2-38 


DOCDOC  -  1  OF  1 


PROCEDURE  'DOCFILE 


PURPOSE 

ATTACH  A  DOCUMENTATION  FILE 


FUNCTIONAL  CATEGORIES:  Q6 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 


USAGE 

BEGIN , DOCFILE , , LFN , PFN , ID, PW1 , PW2 , PW3 , PW4 , PW5 . 


DESCRIPTION  OF  PARAMETERS 

LFN  -  LOCAL  FILE  NAME  TO  BE  USED 

PFN  -  FIRST  PART  OF  PFN. 

FULL  PFN  IS  PFN  DOCUMENTATION. 

ID  -  ID  UNDER  WHICH  IT  IS  CATALOGED 

(DEFAULT:  SYSTEM  PUBLIC-ACCESS  ID) 
PW1-PW5  -  PASSWORDS 


DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  4500B 

REMARKS 

SAME  AS:  ATTACH, LFN, PFN_DOCUMENTATION, ID-* - *,PW-PW1 ,PW2, 

PW3.PW4.PW5. 


AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892 


DATE  WRITTEN:  02/01/76 
DATE (S)  REVISED 

03/01/78  -  CONVERT  TO  CCL;  INCREASE  TO  5  PASSWORDS 


ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, .DOCFILE, OUTPUT, MSACCES-<PASSWORD>. 
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PROCEDURE  ' DOCGET ' 


PURPOSE 

GET  (EXTRACT)  DOCUMENT (S)  FROM  A  DOCUMENT  FILE 

FUNCTIONAL  CATEGORIES:  Q6 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

SYSTEM  PUBLIC-ACCESS  INTERACTIVE  PROCEDURE  FILE 

USAGE 

BEGIN, DOCGET, , LIB, ID,DOC,L, LO, COPIES, I , FID,MSACCES,UN. 

BEGIN, DOCGET, I, <PARAMS>  <—  FOR  INTERACTIVE  VERSION 

BEGIN, DOCGET, I,?  <--  FOR  INTERACTIVE  PROCESSING 

DESCRIPTION  OF  PARAMETERS 
LIB  -  DOCUMENT  FILE 

(FIRST  PART  OF  PFN:  L I B_DOCUMENTAT I ON ; 

OR  MFN) 

ID  -  ID  UNDER  WHICH  PERMANENT  FILE  IS  CATALOGED 

(DEFAULT:  SYSTEM  PUBLIC-ACCESS  ID) 

DOC  -  NAME  OF  SINGLE  DOCUMENT  TO  BE  EXTRACTED 
(USE  'ALL'  FOR  ALL  DOCUMENTS) 

('DOC'  AND  'I'  ARE  MUTUALLY  EXCLUSIVE) 

L  -  LISTABLE  OUTPUT 

(DEFAULT:  L-OUTPUT) 

LO  -  PRINT  CENTERING 

OMITTED,  'L'  OR  'LEFT'  -  LEFT- JUSTIFIED  ON  PAGE 
OTHER  -  CENTERED  ON  WIDE  PAGE 

(DEFAULT:  LO-L) 

COPIES  -  NUMBER  OF  COPIES  (1-99) 

(DEFAULT:  COPIES-1) 

I  -  INPUT  FILE  FOR  MORE  THAN  ONE  DOCUMENT 

(SEE  'DATA  CARDS'  BELOW) 

('DOC'  AND  'I'  ARE  MUTUALLY  EXCLUSIVE) 

(DEFAULT:  DOCUMENT  IS  REQUESTED  USING  THE  'DOC' 
PARAMETER) 

FID  -  OPTIONAL  FILE  ID  FOR  ROUTING  TO  XEROX  8700 

(IF  OMITTED,  THE  EXTRACTED  DOCUMENTS  WILL  BE  IN 
THE  FILE  SPECIFIED  BY  ' L= ’ ) 

MSACCES  -  YOUR  MSS  ACCESS  PASSWORD 

(NEEDED  ONLY  IF  DOCUMENT  FILE  MAY  BE  ON  MSS  AND 
YOU  HAVE  NOT  ALREADY  SPECIFIED  YOUR  PASSWORD  IN 
THE  JOB  OR  SESSION) 

UN  -  UN  UNDER  WHICH  THE  DOCUMENT  FILE  IS  STORED  ON  MSS 

(DEFAULT:  UN  FOR  PUBLIC  DOCUMENTS) 

DEFAULT  BEGIN  STATEMENT 

THE  ONLY  MEANINGFUL  DEFAULT  VALUES  ARE  LISTED  ABOVE. 

MAX  FL:  30000B 
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DATA  CARDS  (I-<LFN>) 

DATA  CARDS  ARE  FREE- FORMAT,  UP  TO  80-COLUMNS  PER  CARD, 
THROUGH  END-OF-FILE.  ENTRIES,  WHICH  ARE  COMMA-SEPARATED, 
HAVE  ONE  OF  THE  FOLLOWING  FORMS: 

DOCNAME  -  SINGLE  COPY 

DOCNAME*N  -  MULTIPLE  COPIES 

E.G.,  'DOC1 ,  DOC2*2,  DOC3.DOC4  *  2’. 

BLANKS  BETWEEN  FIELDS  ARE  IGNORED. 

A  WORD  ABOUT  MULTIPLE  COPIES  AND  LINE  PRINTERS 

SINCE  CENTRAL  SITE  AND  MOST  RJE  TERMINALS  MAKE  USE  OF  THE 
'REP'  PARAMETER  OF  THE  ROUTE  CARD,  THIS  IS  THE  BEST  WAY  TO 
MAKE  MULTIPLE  COPIES.  IT  IS  CHEAPER  AND  CONSERVES  QUEUE 
SPACE  WHILE  IT  WAITS  TO  PRINT. 

FOR  RJE  TERMINALS  WHICH  CANNOT  USE  THIS  METHOD  (1700'S),  TWO 
MEANS  OF  SPECIFYING  MULTIPLE  COPIES  ARE  PROVIDED:  IN  THE 
EXECUTE  STATEMENT  (COPIES-)  AND  IN  THE  DATA  CARD  (SEE 
ABOVE).  THE  PROGRAM  WILL  PREPARE  A  TEMPORARY  FILE  WITH  THE 
REQUESTED  NUMBER  OF  COPIES  OF  EACH  DOCUMENT:  THIS  FILE  IS 
THEN  COPIED  TO  THE  ' L- '  FILE  THE  NUMBER  OF  TIMES  SPECIFIED 
BY  THE  EXECUTE  STATEMENT.  THUS,  IF  YOU  WANT,  FOR  EXAMPLE, 

5  COPIES  OF  ALL  SPECIFIED  DOCUMENTS,  USE  'COPIES-5'  IN  THE 
EXECUTE  STATEMENT;  FOR  5  COPIES  OF  EAC.i  DOCUMENT,  USE  '*5' 
FOR  EACH  DOCUMENT.  DON’T  USE  BOTH  OR  YOU  WILL  GET  5  COPIES 
OF  EACH  DOCUMENT  5  TIMES  (25  COPIES  ALTOGETHER!)  UNLESS 
THAT  IS  WHAT  YOU  REALLY  WANT. 

REMARKS 

DOCUMENTS  ARE  EXTRACTED  USING  UTILITY  PROGRAM  'GETDOC'. 

ERROR  MESSAGES 

BOTH  DOC  AND  I  MAY  NOT  BE  SPECIFIED 

THE  PARAMETERS  'DOC'  AND  ’I'  ARE  MUTUALLY  EXCLUSIVE. 

USE  'DOC'  FOR  A  ONE (ALL)  DOCUMENT (S).  USE  'I'  FOR 
MULTIPLE  DOCUMENTS. 

DOCUMENT  FILE  FOR  <LIB> 

NOT  ON  PF  OR  MSS 
OR 

YOU  MUST  SUPPLY  YOUR  MSACCES  PASSWORD 

IF  <LIB>  WAS  MISSPELLED,  TRY  AGAIN.  OTHERWISE,  SUPPLY 
YOUR  MSACCES  PASSWORD  EITHER  AS  A  SEPARATE  COMMAND  OR  AS 
A  PARAMETER  OF  BEGIN, DOCGET  (MSACCES-<PW>)  AND  TRY  AGAIN. 

LIB  IS  REQUIRED 

THE  PARAMETER  'LIB'  MUST  BE  SPECIFIED. 

NO  DOCUMENT  REQUESTED 

EITHER  PARAMETER  'DOC'  OR  ’I’  IS  REQUIRED. 
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AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 
DATE  WRITTEN:  02/01/76 
DATE (S)  REVISED 

12/01/77  -  ADD  ’LEFT'  PARAMETER 
03/01/78  -  CONVERT  TO  CCL;  ADD  5  PASSWORDS 
80  OR  81  -  REMOVE  PASSWORDS 

08/23/82  -  RE-WRITE  TO  SUPPORT  PF  AND  MSS  FILES 

-  ADD  SUPPORT  FOR  MULTIPLE  COPIES 

-  ADD  SUPPORT  FOR  MULTIPLE  DOCUMENTS 

-  CHANGE  TO  USE  NEW  UTILITY  PROGRAM  GETDOC 
03/11/83  -  EXPAND  AND  HIGHLIGHT  MESSAGE  IF  DOCUMENT  FILE 

NOT  FOUND  ON  PF  OR  MSS 

04/16/84  -  ADD  FID  PARAMETER  FOR  ROUTING  TO  XEROX  8700 
05/03/84  -  MAKE  INTERACTIVE 

-  IMPROVE  DAYFILE  MESSAGE  ABOUT  MISSING  MSACCES 
08/30/84  -  PUT  INTERACTIVE  VERSION  INTO  INTEACTIVE  FILE 

-  PUT  NON-INTERACTIVE  VERSION  INTO  REGULAR  FILE 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, ,PROCFIL, , DOCGET, OUTPUT, MSACCES“<PASSWORD> . 
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PROCEDURE  'DOCLIST 


PURPOSE 

LIST  DOCUMENT  NAMES  (ON  *DECK  CARDS)  IN  A  DOCUMENTATION  FILE 

FUNCTIONAL  CATEGORIES:  Q6 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN , DOCLIST , , LIB , ID, OUTPUT , PW1 , PW2 , PW3 , PWA , PW5 , MSACCES , UN . 

DESCRIPTION  OF  PARAMETERS 

LIB  -  FIRST  PART  OF  PFN 

(FULL  PFN  IS  LIB  DOCUMENTATION) 

ID  -  ID  UNDER  WHICH  IT  IS  CATALOGED 

(DEFAULT:  SYSTEM  PUBLIC-ACCESS  ID) 

OUTPUT  -  LISTABLE  OUTPUT 
PW1-PW5  -  PASSWORDS 

MSACCES  -  MSACCES  PASSWORD  (REQUIRED  IF  DOCUMENT  FILE  IS  ON 
MSS  AND  YOU  HAVE  NOT  SUBMITTED  IT  ALREADY) 

UN  -  UN  FOR  MSS 

(DEFAULT:  DOCU) 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  27000B 

REMARKS 

IN  ADDITION  TO  THE  DOCUMENT  NAMES,  THE  NUMBER  OF  CARDS, 

LINES  AND  PAGES  IS  GIVEN  FOR  EACH  DOCUMENT. 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  02/01/76 

DATE(S)  REVISED 
04/23/76 

03/01/78  -  CONVERT  TO  CCL;  ADD  5  PASSWORDS 
08/17/83  -  ADD  SUPPORT  FOR  MSS  FILES 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, ,PROCFIL, .DOCLIST, OUTPUT, MSACCES-<PASSWORD>. 
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PROCEDURE  'DOCREPL ' 


PURPOSE 

REPLACE  ONE  DOCUMENT  IN  A  DOCUMENTATION  FILE 

FUNCTIONAL  CATEGORIES:  Q6 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC- ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN , DOCREPL , , LIB , ID, PROG , AFTER , LFN , AC , PW1 , PW2 , PW3 , PW4 , PW5 . 
DESCRIPTION  OF  PARAMETERS 


LIB 

-  FIRST  PART  OF  DOCUMENTATION  FILE  PFN 
(FULL  PFN  IS  LIB  DOCUMENTATION) 

ID 

-  ID  UNDER  WHICH  IT  IS  CATALOGED 
(DEFAULT:  SYSTEM  PUBLIC-ACCESS  ID) 

PROG 

-  NAME  OF  DOCUMENT  TO  BE  REPLACED 

AFTER 

-  NAME  OF  DOCUMENT  AFTER  WHICH  THIS  DOCUMENT 
BE  PLACED 

(IF  BLANK,  WILL  GO  IN  ALPHABETICAL  ORDER. 
IF  'O',  WILL  GO  AT  START  OF  FILE. 

IF  'END',  WILL  GO  AT  END  OF  FILE.) 

IS  TO 

(USED  ONLY  IF  PROG  DOES  NOT  ALREADY  EXIST 
DOCUMENT  FILE.) 

IN  THE 

LFN 

-  LFN  OF  FILE  CONTAINING  NEW  DOCUMENT. 

IT  IS  REWOUND  BEFORE  BEING  READ.  IT  MUST 
CONTAIN  A  *DECK  CARD. 

NOT 

AC 

-  JOB  ORDER  NUMBER  FOR  CATALOG 
(MAY  BE  OMITTED) 

PW1-PW5 

-  PASSWORDS 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  31000B 

REMARKS 

THE  LOWEST  CYCLE  OF  L I B_DOCUMEN TAT I ON  IS  PURGED,  IF 
POSSIBLE.  AT  LEAST  2  CYCLES  ARE  ALWAYS  RETAINED. 

EXAMPLES 

ASSUME  THE  OLD  DOCUMENT  FILE  WAS  CATALOGED  WITH: 

CATALOG, FILE .MYDOCUMENTAT I ON , ID-XXXX , XR-RONLY . 

AND  HAS  DOCUMENTS:  A,  B,  D,  F,  G,  H. 

TO  REPLACE  DOCUMENT  F  (NEW  DOCUMENT  ON  LFN  FF) : 

BEGIN, DOCREPL, ,MY,XXXX,F, ,FF, ,RONLY. 

THE  NEW  DOCUMENT  FILE  WILL  HAVE:  A,  B,  D,  F,  G,  H. 

TO  REPLACE  DOCUMENT  E  (NEW  DOCUMENT  ON  LFN  EE) : 

BEGIN, DOCREPL, , MY , XXXX , E , , EE , , RONLY. 

THE  NEW  DOCUMENT  FILE  WILL  HAVE:  A,  B,  D,  E,  F,  G,  H. 

NOTE  THAT  SINCE  E  DID  NOT  EXIST,  REPLACE  WAS  CHANGED  TO  ADD. 
BECAUSE  THE  AFTER  PARAMETER  WAS  OMITTED,  E  WAS  ADDED 
ALPHABETICALLY. 
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AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 
DATE  WRITTEN:  02/01/76 
DATE (S)  REVISED 

03/01/78  -  CONVERT  TO  CCL;  INCREASE  TO  5  PASSWORDS 


ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, , DOCREPL , OUTPUT , MSACCES“<PASSWORD> . 
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PROCEDURE  1 DSAUDIT 


PURPOSE 

AUDIT  DISKS  ASSIGNED  TO  USER  INITIALS 

FUNCTIONAL  CATEGORIES:  QO 

COMPUTERS  (OPERATING  SYSTEMS) 

CDC  6600 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, DSAUDIT. 

DEFAULT  BEGIN  STATEMENT 
BEGIN, DSAUDIT. 

MAX  FL:  12500B 

REMARKS 

USER  INITIALS  TO  BE  AUDITED  WILL  BE  THE  LOGGED-IN  USER 
INITIALS. 

OUTPUT  DESCRIPTION 

A  LIST  OF  DISKS  ASSIGNED  TO  THE  LOGGED-IN  USER  INITIALS. 
AUTHOR 

JANET  MOXLEY  -  DTNSRDC  CODE  189.3 

DATE  WRITTEN:  FEBRUARY  1982 

DATE (S)  REVISED 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, , DSAUDIT , OUTPUT , MSACCES*=<PASSWORD> . 
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PROCEDURE  'DSRLS' 


PURPOSE 

RELEASING  OF  ASSIGNED  DISKS 

FUNCTIONAL  CATEGORIES:  00 

COMPUTERS  (OPERATING  SYSTEMS) 

CDC  6000/CYBER  170  (NOS/BE) 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC- ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, DSRLS. 

DEFAULT  BEGIN  STATEMENT 
BEGIN, DSRLS. 

MAX  FL:  12500B 

REMARKS 

USER  WILL  BE  PROMPTED  TO  ENTER  DISK  VSN ' S  TO  BE  RELEASED. 
DISKS  MUST  BE  ASSIGNED  TO  THE  USER'S  LOGGED-IN  USER 
INITIALS. 

OUTPUT  DESCRIPTION 

VERIFICATION  OF  THE  RELEASED  DISK(S). 


AUTHOR 

JANET  MOXLEY  -  DTNSRDC  CODE  189.3 

DATE  WRITTEN:  FEBRUARY  1982 

DATE (S)  REVISED 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN , DOCGET , , PROCFIL , , DSRLS , OUTPUT , MSACCES-<PASSWORD> . 
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PROCEDURE  'D2A' 


PURPOSE 

CONVERT  DISPLAY  CODE  FILE  TO  ASCII  FOR  FILE  TRANSFER  VIA 
NALCON/ARPANET 

FUNCTIONAL  CATEGORIES:  M2  K1 

COMPUTERS  (OPERATING  SYSTEMS) 

CDC  6000/CYBER  170  (NOS/BE) 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN , D2A , , DCFI LE , DCID , ASCFI LE , ASC ID , DCSN . 

DESCRIPTION  OF  PARAMETERS 

DCFILE  -  DISPLAY  CODE  FILE  TO  BE  CONVERTED 
DCID  -  ID  UNDER  WHICH  DCFILE  IS  CATALOGED 
ASCFILE  -  OUTPUT  ASCII  FILE 

ASCID  -  ID  UNDER  WHICH  ASCFILE  WILL  BE  CATALOGED 
(IF  OMITTED,  DCID  WILL  BE  USED) 

DCSN  -  SETNAME  OF  USER  DEVICE  SET  FOR  DCFILE 
(ASCFILE  IS  ALWAYS  CATALOGED  ON  SYSSET) 

.  (DEFAULT:  SYSSET) 

DEFAULT  BEGIN  STATEMENT 
NO  MEANINGFUL  DEFAULTS 

MAX  FL:  20000B 

REMARKS 

THE  INPUT  DISPLAY  CODE  FILE  IS  A  FILE  OF  PRINT  LINE  OR  CARD 
IMAGES . 

AUTHORS 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2  (PROCEDURE  D2a) 

ROBERT  TIMKER  -  DTNSRDC  CODE  1892.3  (CONVERSION  PROGRAM) 

DATE  WRITTEN:  03/18/81  (PROCEDURE) 

DATE (S)  REVISED 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, ,PROCFIL, ,D2A, OUTPUT, MSACCES=<PASSWORD> . 
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PROCEDURE  ' FETCHC ’ 


PURPOSE 

GET  CSYS  OR  PUBLIC  FILES  (FROM  MSS,  IF  NECESSARY) 

FUNCTIONAL  CATEGORIES:  K1  QO 

COMPUTERS  (OPERATING  SYSTEMS) 

CDC  6000/CYBER  170  (NOS/BE) 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE  FOR  MSS 
USAGE 

BEGIN , FETCHC , MSS , PFN , ID. 

DESCRIPTION  OF  PARAMETERS 

PFN  -  PERMANENT  FILE  NAME 
(1-7  CHARACTERS) 

ID  -  ID  UNDER  WHICH  PFN  IS  CATALOGED. 

MUST  BE  ONE  OF: 

OMITTED  -  PUBLIC  FILE 
CSYS  -  CSYS  FILE 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  20000B 

REMARKS 

THE  PROCEDURE  TESTS  TO  SEE  IF  PFN  IS  A  LOCAL  FILE. 

IF  NOT,  IT  TRIES  TO  ATTACH  IT  USING  THE  SPECIFIED  ID. 

IF  NOT  SUCCESSFUL,  IT  WILL  TRY  TO  FETCH  IT  FROM  THE  MASS 
STORAGE  SYSTEM. 

ERROR  MESSAGE 

ID-<ID>  NOT  SUPPORTED 

THE  PROCEDURE  SUPPORTS  ONLY  THE  PUBLIC-ACCESS  ID 
(ID  OMITTED)  AND  ID-CSYS. 

EXAMPLES 

1)  GET  THE  ECAP  PROGRAM  (PUBLIC-ACCESS  FILE): 

BEGIN , FETCHC , MSS , ECAMP . 

2)  GET  NOS/BE  LEVEL  461  PRODUCTS  FILE  (ID-CSYS) : 

BEGIN , FETCHC , MSS , PROD46 1 , CSYS . 


AUTHOR 

SHARON  GOOD  -  DTNSRDC  CODE  1892.1 

DATE  WRITTEN:  01/05/82 

DATE (S)  REVISED 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, .FETCHC, OUTPUT, MSACCES-<PASSWORD> . 
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PROCEDURE  'FETCHM' 


PURPOSE 

GET  ANY  FILE  (FROM  MSS,  IF  NECESSARY) 


FUNCTIONAL  CATEGORIES:  K1  QO 


COMPUTERS  (OPERATING  SYSTEMS) 
CDC  6000/CYBER  170  (NOS/BE) 


LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE  FOR  MSS 


USAGE 

BEGIN , FETCHM , MSS , LFN , PFN , ID , UN , PW . 


DESCRIPTION  OF  PARAMETERS 


LFN 


PFN 

ID 


UN 

PW 


-  LOCAL  FILE  NAME 

(MUST  BE  MSS  FILE  NAME,  IN  CASE  THE  FILE  MUST  BE 
FETCHED  FROM  THE  MASS  STORAGE  SYSTEM) 

-  PERMANENT  FILE  NAME 

-  ID  UNDER  WHICH  PFN  IS  CATALOGED 
(DEFAULT:  PUBLIC-ACCESS  ID) 

-  UN  UNDER  WHICH  LFN  IS  STORED  ON  MSS 
(DEFAULT:  FROM  CHARGE  CARD/LOGIN) 

-  MSS  PASSWORD,  IF  REQUIRED 


DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 


MAX  FL:  20000B 


REMARKS 

THE  PROCEDURE  TESTS  TO  SEE  IF  PFN  IS  A  LOCAL  FILE. 

IF  NOT,  IT  TRIES  TO  ATTACH  IT  USING  THE  SPECIFIED  ID. 

IF  NOT  SUCCESSFUL,  IT  WILL  TRY  TO  FETCH  IT  FROM  THE  MASS 
STORAGE  SYSTEM  USING  <LFN>  AS  THE  MSS  FILE  NAME. 


EXAMPLES 

1)  GET  USER  XXXX'S  PROGRAM  XPROGABS: 


BEGIN , FETCHM, MSS , ABS , XPROGRAMABS , XXXX , XXXX , XXXXPW . 
2)  GET  NOS/BE  LEVEL  461  PRODUCTS  FILE  (ID-CSYS) : 

BEGIN , FETCHM , MSS , PROD , PROD46 1 , CS YS . 


3)  GET  PUBLIC- ACCESS  FILE  RIQSCOPYS: 

BEGIN , FETCHM , MSS , COP YS , RIQSCOPYS. 


AUTHOR 

SHARON  GOOD 


DTNSRDC  CODE  1892.1 
DATE  WRITTEN:  01/05/82 
DATE(S)  REVISED 


ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN , DOCGET , , PROCFIL , , FETCHM , OUTPUT , MSACCES«<PASSWORD> . 
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PROCEDURE  ' F45IT 


PURPOSE 

SIMPLE  CONVERSION  OF  FTN4  SOURCE  TO  FTN5 

FUNCTIONAL  CATEGORIES:  L7 

COMPUTERS  (OPERATING  SYSTEMS) 

CDC  6000/CYBER  170  (NOS/BE) 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN , F45IT, , F4,F5, OUTPUT . 

DESCRIPTION  OF  PARAMETERS 

F4  -  INPUT  FTN4  SOURCE  PROGRAM 

F5  -  OUTPUT  FTN5  SOURCE  PROGRAM 

OUTPUT  -  LISTABLE  OUTPUT 

DEFAULT  BEGIN  STATEMENT 

BEGIN, F45IT, ,F4,F5, OUTPUT. 

MAX  FL:  75000B 

REMARKS 

IF  YOU  WANT  OTHER  OUTPUT,  SUCH  AS  UPDATE  DIRECTIVES,  USE  F45 
DIRECTLY. 

OUTPUT  DESCRIPTION 
ON  OUTPUT: 

-  A  NUMBER  LISTING  OF  THE  FTN4  SOURCE  PROGRAM 

-  A  NUMBER  LISTING  OF  THE  CONVERTED  FTN5  SOURCE  PROGRAM 

-  A  SUMMARY  OF  THE  CHANGES 

ON  F5: 

-  THE  CONVERTED  FTN5  SOURCE  PROGRAM 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2  -  THE  PROCEDURE  TO 

ACCESS  CDC  PROGRAM 
F45 

DATE  WRITTEN:  05/05/81 
DATE (S)  REVISED 

07/20/82  -  CONVERT  INTO  A  PUBLIC-ACCESS  PROCEDURE 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, ,F45IT, OUTPUT, MSACCES-<PASSWORD>. 


04/30/84 


2-51 


F45IT 


1  OF  1 


PROCEDURE  ' GETMFNS ' 


PURPOSE 

DO  MSAUDIT  AND  EXTRACT  FILE  NAMES 

FUNCTIONAL  CATEGORIES:  QO 

COMPUTERS  (OPERATING  SYSTEMS) 

CDC  6000/CYBER  170  (NOS/BE) 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE  FOR  MSS 
USAGE 

BEGIN , GETMFNS , MSS , UN , LF , MSACCES . 

DESCRIPTION  OF  PARAMETERS 

UN  -  USERNAME  (USER  INITIALS) 

LF  -  OUTPUT  FILE 

MSACCES  -  MSS  ACCESS  PASSWORD 

(REQUIRED  ONLY  IF  NOT  PREVIOUSLY  GIVEN  IN  JOB 
OR  INTERCOM  SESSION) 

DEFAULT  BEGIN  STATEMENT 

BEGIN, GETMFNS, MSS, .THEMFNS, . 

MAX  FL:  200000B 

REMARKS 

NONE 

OUTPUT  DESCRIPTION 

THE  OUTPUT  FILE  HAS  ONE  MSS  FILE  NAME  (WITH  UN)  PER  RECORD: 


COL 

CONTENTS 

1-7 

MFN 

8-14 

UN 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 
DATE  WRITTEN:  07/07/82 
DATE (S)  REVISED 

10/17/83  -  ADD  TO  MSS  PROCEDURE  FILE 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, .GETMFNS, OUTPUT, MSACCES-<PASSWORD>. 
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PROCEDURE  ' GETMS 


PURPOSE 

TRANSFER  ONE  MSS  FILE  (OF  EXECUTING  USER)  TO  A  CDC  PERMANENT 
FILE 

FUNCTIONAL  CATEGORIES:  K1  QO 
LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE  FOR  MSS 

COMPUTERS  (OPERATING  SYSTEMS) 

CDC  6000/CYBER  170  (NOS/BE) 

USAGE 

BEGIN, GETMS, MSS, MFN, UN, PW.PFN, ID, XR,TK,RD, AC. 

DESCRIPTION  OF  PARAMETERS 

MFN  -  MASS  STORAGE  SYSTEM  FILE  NAME 

UN  -  USERNAME  FOR  MSFETCH 

(IF  OMITTED,  EXECUTING  USER  ID  IS  USED) 

PW  -  PASSWORD  FOR  MSFETCH 

PFN  -  CDC  PERMANENT  FILE  NAME 

(IF  OMITTED,  PFN-MFN) 

ID  -  ID  FOR  CATALOG  ON  CDC 

XR  -  XR  PASSWORDS  FOR  CDC  PERMANENT  FILE 

TK  -  TK  PASSWORDS  FOR  CDC  PERMANENT  FILE 

RD  -  RD  PASSWORDS  FOR  CDC  PERMANENT  FILE 

AC  -  AC  FOR  CATALOG 

DEFAULT  BEGIN  STATEMENT 
BEGIN, GETMS, MSS,*, ,0, ,  *. 

(*  -  USER  MUST  SUPPLY) 

MAX  FL:  20000B 

REMARKS 

SEE  ALSO  PROCEDURES  ’ M2C ' ,  'M2 CALL ' ;  ’PUTMS',  'C2M' , 

' C2MALL ' . 

ERROR  MESSAGES 

GETMS  REQUIRES  MFN  PARAMETER 
SELF-EXPLANATORY. 

GETMS  REQUIRES  ID  PARAMETER  FOR  CATALOG 
SELF-EXPLANATORY. 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  01/13/82 

DATE (S)  REVISED 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, , GETMS, OUTPUT, MSACCES-<PASSWORD> . 
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PROCEDURE  'GETPROD 


PURPOSE 

GET  PRODUCTS  FILE(S)  FOR  NOS/BE  LEVELS  538,  518,  508,  461, 
439,  434,  420,  414,  410,  406,  401,  380  FROM  THE  MASS  STORAGE 
SYSTEM 

FUNCTIONAL  CATEGORIES:  QO 

COMPUTERS  (OPERATING  SYSTEMS) 

CDC  6000/CYBER  170  (NOS/BE) 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN , GETPROD, , LVL , COBOL5 , SORTMRG , MSACCES . 

DESCRIPTION  OF  PARAMETERS 

LVL  -  DESIRED  LEVEL  (SEE  PURPOSE  ABOVE) 

(LFN  'PROD'  WILL  CONTAIN  THE  PRODUCTS  FILE) 

COBOL5  -  NON-BLANK  -  GET  COBOL5  FILE  (LVL-434) 

(FILE  'COB5LIB '  WILL  CONTAIN  IT) 
SORTMRG  -  NON-BLANK  -  GET  SORT/MERGE  V4  FILE  (LVL-461) 

(FILE  'SORTLIB'  WILL  CONTAIN  IT) 
MSACCES  -  YOUR  MS  ACCESS  PASSWORD 

(REQUIRED  ONLY  IF  NOT  PREVIOUSLY  SUBMITTED  DURING 
JOB  OR  SESSION) 

DEFAULT  BEGIN  STATEMENT 

MAX  FL:  20000B 

REMARKS 

NONE 

ERROR  MESSAGES 

INVALID  LEVEL  (LVL) 

MUST  BE  ONE  OF 
538  518  508  461  439  434  420 
414  410  406  401  380 
SELF-EXPLANATORY 

NO  LEVEL  REQUESTED 
MUST  BE  ONE  OF 
538  518  508  461  439  434  420 
414  410  406  401  380 
SELF-EXPLANATORY 

*****  NO  SEPARATE  LVL  COBOL5  LIBRARY 

YOU  ASKED  FOR  COBOL5  BUT  THERE  IS  NO  SEPARATE  FILE  FOR 
IT.  EITHER  COBOL5  DOES  NOT  EXIST  AT  THE  REQUESTED  LEVEL 
OR  IT  IS  INCLUDED  IN  THE  PRODUCTS  FILE. 

*****  NO  SEPARATE  LVL  SORTMRG  LIBRARY 

YOU  ASKED  FOR  SORTMRG,  HOWEVER,  IT  IS  INCLUDED  IN  THE 
PRODUCTS  FILE. 


04/30/84 


2-54 


GETPROD  -  1  OF  2 


AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 


DATE  WRITTEN:  11/30/78 
DATE(S)  REVISED 

06/04/82  -  COMPLETE  RE-WRITE  TO  GET  FILES  FROM  MSS 


ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, .GETPROD, OUTPUT, MSACCES-<PASSWORD> . 


■N'.V. 
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PROCEDURE  'GRIPE 


PURPOSE 

ALLOW  USER  TO  MAKE  GRIPES  OR  SUGGESTIONS  DIRECTLY  TO  THE 
COMPUTER 

FUNCTIONAL  CATEGORIES:  QO 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN .GRIPE , , OUTPUT , PROMPT , DUMMY , INPUT . 

DESCRIPTION  OF  PARAMETERS 

OUTPUT  -  LISTABLE  OUTPUT,  IF  USER  REQUESTS  A  COPY  OF  HIS 
COMMENTS.  TO  PRINT  AT  THE  TELETYPE,  USER  MUST 
CONNECT, OUTPUT. 

PROMPT  -  INTERACTIVE  USE  ONLY: 

IF  NO  -  ONLY  NOMINAL  PROMPTING  IS  PROVIDED. 

IF  OMITTED  OR  ANYTHING  ELSE  -  FULL  PROMPTING 
IS  PROVIDED. 

DUMMY  -  RESERVED  FOR  FUTURE  USE 

INPUT  -  BATCH:  FILE  FROM  WHICH  GRIPE  AND  ADMINISTRATIVE 
INFORMATION  IS  TO  BE  READ. 

INTERACTIVE:  IF  GRIPE  IS  TO  BE  ENTERED  DIRECTLY 
FROM  THE  KEYBOARD,  OMIT  THIS  PARAMETER. 

IF  THE  GRIPE  WAS  PREPARED  EARLIER  (E.G.,  USING 
NETED  OR  EDITOR),  ENTER  THE  LFN  OF  THE  FILE 
CONTAINING  THE  GRIPE  (DO  NOT  USE  LFN  'INPUT'). 

DEFAULT  BEGIN  STATEMENT 

BATCH  :  BEGIN, GRIPE,, OUTPUT,,, INPUT. 

INTERACTIVE:  BEGIN, GRIPE, .OUTPUT. 

MAX  FL:  36000B 

REMARKS 

ALL  GRIPES  WILL  BE  READ  AND,  IF  APPROPRIATE,  TROUBLE  FORMS 
WILL  BE  PREPARED. 

DATA  CARDS  (BATCH  ONLY) 

THE  GRIPE  IS  ENTERED  IN  COLUMNS  1-70  OF  AS  MANY  CARDS  AS 
REQUIRED  (PLEASE  BE  BRIEF) .  THIS  IS  FOLLOWED  BY  A  CARD  WITH 
'END  '  IN  COLUMNS  1-10. 

THE  LAST  CARD  HAS  ADMINISTRATIVE  INFORMATION  FOR  PREPARING  A 
TROUBLE  FORM,  SHOULD  ONE  BE  NECESSARY.  IT  CONTAINS: 

COL  CONTENTS 


1-20  NAME 

21-40  DTNSRDC  CODE  OR  COMPANY  NAME 
41-50  TELEPHONE 

51-54  USER  INITIALS  (OF  THE  FORM  XXXX) 
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EXAMPLES 

THE  SIMPLEST  FORM  FOR  BATCH  USE: 

JOB  CARD 
CHARGE  CARD 
BEGIN, GRIPE. 

'  7/8/9  EOR 

(GRIPE) 

END 

NAME  . . .  CODE  . . .  PHONE  INIT 
"  6/7/8/9  EOF 

THE  SIMPLEST  FORM  FOR  INTERACTIVE  USE:  . 

CONNECT, OUTPUT. 

BEGIN, GRIPE. 


AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  03/76 

DATE (S)  REVISED 

03/01/78  -  CONVERT  TO  CCL 

06/24/83  -  PROHIBIT  RUNNING  ON  MFC/MFD 

-  ADD  ERROR  MESSAGE  IF  GRIPE  FILE  DISAPPEARS 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, .GRIPE, OUTPUT, MSACCES-<PASSWORD>. 
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PROCEDURE  ' IDDS 


PURPOSE 

PREPARE/EXAMINE  GRAPHICALLY  NUMERICAL  DATA  INPUT  TO  OR 
OUTPUT  FROM  A  FORTRAN  PROGRAM 

FUNCTIONAL  CATEGORIES:  LO  J5 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, IDDS. 

BEGIN, IDDS, , ID, NAME. 

BEGIN, IDDS, , , .INPUT. 

DESCRIPTION  OF  PARAMETERS 
ID  -  USER  INITIALS 

NAME  -  NAME  GIVEN  AT  TIME  OF  CATALOGING  IDMFILE 
INPUT  -  WILL  READ  IDDS  COMMANDS  FROM  BATCH 

DEFAULT  BEGIN  STATEMENT 
BEGIN, IDDS. 

MAX  FL:  100000 

REMARKS 

NONE 

ERROR  MESSAGES 

FILE  NOT  CATALOGED 

THE  BEGIN  STATEMENT  IS  MISSING  THE  APPROPRIATE  NUMBER  OF 
COMMAS 

EXAMPLES 

1)  BEGIN, IDDS,, CAMV.FLNAME. 

WILL  BEGIN  PROCEDURE  FROM  THE  IDMFILE  CATALOGED 
AS  'CAMVFLNAMEIDMFILE,  ID-CAMV'. 

2)  BEGIN, IDDS,,,, BFILE. 

WILL  LOOK  FOR  IDDS  COMMANDS  FROM  LOCAL  FILE  BFILE 


AUTHOR 

MEL  HAAS 

DATE  WRITTEN:  JANUARY  1977 

DATE (S)  REVISED 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN , DOCGET , , PROCFIL , , IDDS , OUTPUT , MSACCES-<PASSWORD> . 


I 
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PROCEDURE  ' LGOTREE ' 


PURPOSE 

GENERATE  CROSS-REFERENCE  LISTS  AND  TREE  STRUCTURE  FROM 
BINARY  RELOCATABLE  OBJECT  PROGRAM 

FUNCTIONAL  CATEGORIES:  Q6 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN , LGOTREE , , LFN, OUTPUT , RFL . 

DESCRIPTION  OF  PARAMETERS 

LFN  -  RELOCATABLE  PROGRAM  TO  BE  PROCESSED  (DEFAULT:  LGO) 
OUTPUT  -  LISTABLE  OUTPUT 

RFL  -  FL  NEEDED  FOR  EXECUTION  OF  STRUCTURE  PROGRAM 

(DEFAULT  OF  30000  IS  SUFFICIENT  FOR  MOST  FILES) 
(USER'S  FL  IS  RESTORED  TO  THE  SYSTEM  DEFAULT) 

DEFAULT  BEGIN  STATEMENT 

BEGIN , LGOTREE , , LGO , OUTPUT , 30000 . 

MAX  FL:  30000B  (OR  AS  USER  SPECIFIES  IN  THIRD  PARAMETER) 

REMARKS 

THIS  PROCEDURE  USES  A  PROGRAM  WRITTEN  AT  THE  CONSTRUCTION 
ENGINEERING  RESEARCH  LABORATORY  (CERL)  AND  MODIFIED  AT 
DTNSRDC. 

REFERENCES  IN  A  MAIN  PROGRAM  TO  FILES  LISTED  IN  THE  PROGRAM 
STATEMENT  WILL  NOT  GENERATE  EXTERNAL  REFERENCES  AND, 
THEREFORE,  WILL  NOT  APPEAR  IN  THE  CROSS-REFERENCE  LISTS  OR 
TREE  STRUCTURE.  REPLACING  THE  PROGRAM  STATEMENT  WITH  ONE 
CONTAINING  NO  FILES  (E.G.,  'PROGRAM  SAMPLE')  WILL  FORCE 
EXTERNAL  REFERENCES  FOR  I/O  OPERATIONS  WHICH  WILL  THEN  BE 
PROCESSED  BY  THE  STRUCTURE  PROGRAM. 

ERROR  MESSAGES 

ABNORMAL  TERMINATION 

IF  NO  OTHER  ERRORS  LISTED,  INCREASE  RFL 

USER-SPECIFIED  (OR  DEFAULT)  RFL  WAS  NOT  SUFFICIENT. 

THE  PROCEDURE  ENDS  WITH  ' REVERT, ABORT ' . 

<OUTPUT>  CONTAINS  STRUCTURE  OF  FILE  <LFN> 

PROCEDURE  WAS  SUCCESSFUL 
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AUTHORS 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2  -  PROCEDURE  ' LGOTREE ' 
PETE  ROTH  -  DTNSRDC  CODE  175.2  -  PROGRAM  'ANATOMY' 

DATE  WRITTEN:  07/06/77 

DATE(S)  REVISED 

03/01/78  -  CONVERT  TO  CCL 

12/10/80  -  CHANGE  NAME  FROM  'STRUCT'  TO  'LGOTREE' 

-  USE  MODIFIED  STRUCT  PROGRAM  CALLED  ANATOMY 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, .LGOTREE, OUTPUT, MSACCES-<PASSWORD>. 
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PROCEDURE  LIBPRO 


PURPOSE 

EXECUTE  A  PROCEDURE  ON  LIBRARY  'PROCFIL'  CATALOGED  UNDER  ANY 
ID 

FUNCTIONAL  CATEGORIES:  LO  Q3 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, LIBPRO, , ID, PNAME, PAR AMS. 

DESCRIPTION  OF  PARAMETERS 

ID  -  ID  UNDER  WHICH  PROCEDURE  LIBRARY  IS  CATALOGED 

(PFN  MUST  BE  'PROCFIL') 

PNAME  "  PROCEDURE  NAME 

PARAMS  -  UP  TO  18  PARAMETERS  FOR  PROCEDURE  'PNAME' 

(KEYWORD  PARAMETERS  MUST  BE  $-DELIMITED,  E.G., 
$OPT“L$.) 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  DEPENDS  UPON  PROCEDURE  BEING  EXECUTED 

REMARKS 

ANY  'LIBRARY'  STATEMENT  IN  EFFECT  WHEN  'LIBPRO'  STARTS  IS 
CLEARED  WHEN  'LIBPRO'  FINISHES. 

SEE  ALSO  PROCEDURES  'ANYPRO',  'ANYPROS',  ' LIBPROA' ,  'MYPRO' , 
'MYPROS ' . 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  11/01/79 

DATE (S)  REVISED 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, .LIBPRO, OUTPUT, MSACCES-<PASSWORD>. 
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PROCEDURE  ' LIBPROA 


PURPOSE 

EXECUTE  A  PROCEDURE  ON  ANY  CATALOGUED  PROCEDURE  LIBRARY 

FUNCTIONAL  CATEGORIES:  LO  Q3 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN , LIBPROA, , PFN, ID, PNAME , PARAMS . 

DESCRIPTION  OF  PARAMETERS 

PFN  -  PERMANENT  FILE  NAME  OF  PROCEDURE  FILE 

ID  -  ID  UNDER  WHICH  PFN  IS  CATALOGED 

PNAME  -  PROCEDURE  NAME 
PARAMS  -  UP  TO  17  PARAMETERS  FOR  'PNAME' 

(KEYWORD  PARAMETERS  MUST  BE  $~DELIMITED,  E.G., 
$OPT-L$.) 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  DEPENDS  UPON  PROCEDURE  BEING  EXECUTED 

REMARKS 

ANY  'LIBRARY'  STATEMENT  IN  EFFECT  WHEN  'LIBPROA'  STARTS  IS 
CLEARED  WHEN  'LIBPROA'  FINISHES. 

SEE  ALSO  PROCEDURES  'ANYPRO',  ’ANYPROS’,  ’LIBPRO’,  ’MYPRO ’ , 
'MYPROS ' . 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  11/01/79 

DATE(S)  REVISED 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, .LIBPROA, OUTPUT, MSACCES-<PASSWORD> . 
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PROCEDURE  1 LIBSET1 ' 


PURPOSE 

CREATE  SIMPLE  ABSOLUTE  USING  ONE  EDITLIB  LIBRARY 

FUNCTIONAL  CATEGORIES:  LO  Q3 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, LIBSET1, , LGO, ABS, LIB1 , ID1 . 

DESCRIPTION  OF  PARAMETERS 

LGO  -  RELOCATABLE  PROGRAM 

ABS  -  RESULTING  ABSOLUTE  MODULE 

LIB1  -  PFN  OF  EDITLIB  USER  LIBRARY 

(DEFAULT:  NSRDC) 

ID1  -  ID  UNDER  WHICH  LIB1  IS  CATALOGED 
(DEFAULT:  SYSTEM  PUBLIC-ACCESS  ID) 

DEFAULT  BEGIN  STATEMENT 

BEGIN, LIBSET1,, LGO, ABS, NSRDC. 

MAX  FL:  DEPENDS  ON  PROGRAM  BEING  LOADED 

REMARKS 

NONE 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  03/01/76 

DATE (S)  REVISED 

03/01/78  -  CONVERT  TO  CCL 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, , LIBSET1 , OUTPUT ,MSACCES“<PASSWORD> . 
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PROCEDURE  ' LIBSET2 ' 

PURPOSE 

CREATE  SIMPLE  ABSOLUTE  USING  TWO  EDITLIB  LIBRARIES 

FUNCTIONAL  CATEGORIES:  LO  Q3 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, LIBSET2, , LGO, ABS , LIB1 , ID1 , LIB2, ID2. 

DESCRIPTION  OF  PARAMETERS 

LGO  -  RELOCATABLE  PROGRAM 

ABS  -  RESULTING  ABSOLUTE  MODULE 

LIB1  -  PFN  OF  FIRST  EDITLIB  USER  LIBRARY 
(DEFAULT:  NSRDC) 

ID1  -  ID  UNDER  WHICH  LIB1  IS  CATALOGED 
(DEFAULT:  SYSTEM  PUBLIC-ACCESS  ID) 

LIB2  -  PFN  OF  SECOND  EDITLIB  USER  LIBRARY 
(DEFAULT:  NSRDC) 

ID2  -  ID  UNDER  WHICH  LIB2  IS  CATALOGED 
(DEFAULT:  SYSTEM  PUBLIC-ACCESS  ID) 

DEFAULT  BEGIN  STATEMENT 

BEGIN,  LIBSET2,  ,  LGO,  ABS, NSRDC,  .NSRDC.' 

MAX  FL:  DEPENDS  ON  PROGRAM  BEING  LOADED 

REMARKS 

NONE 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  03/01/76 

DATE (S)  REVISED 

03/01/78  -  CONVERT  TO  CCL 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN , DOCGET , , PROCFIL , , LIBSET2 , OUTPUT , MSACCES*<PASSWORD> . 
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PROCEDURE  ' LINE6 


PURPOSE 

SET  PRINT  FILE  TO  6  LINES  PER  INCH 

FUNCTIONAL  CATEGORIES:  J4 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, LINE6, .OUTPUT. 

DESCRIPTION  OF  PARAMETER 
OUTPUT  -  LISTABLE  OUTPUT 

DEFAULT  BEGIN  STATEMENT 
BEGIN, LINE6, .OUTPUT. 

MAX  FL:  6000B 

REMARKS 

USER  SHOULD  PRINT  THE  NEXT  LINE  AT  THE  TOP  OF  THE  NEXT  PAGE. 
AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  06/07/76 

DATE (S)  REVISED 

03/01/78  -  CONVERT  TO  CCL 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET , .PROCFIL, ,LINE6, OUTPUT, MSACCES-<PASSWORD>. 
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PROCEDURE  ' LINE8 ' 


PURPOSE 

SET  PRINT  FILE  TO  8  LINES  PER  INCH 

FUNCTIONAL  CATEGORIES:  J4 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, LINE8, .OUTPUT. 

DESCRIPTION  OF  PARAMETER 
OUTPUT  -  LISTABLE  OUTPUT 

DEFAULT  BEGIN  STATEMENT 
BEGIN , LINE8 , , OUTPUT . 

MAX  FL:  6000B 

REMARKS 

USER  SHOULD  PRINT  THE  NEXT  LINE  AT  THE  TOP  OF  THE  NEXT  PAGE. 
AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN;  06/07/76 

DATE (S)  REVISED 

03/01/78  -  CONVERT  TO  CCL 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN .DOCGET, .PROCFIL, .LINE8, OUTPUT, MSACCES-<PASSWORD>. 
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PROCEDURE  'LIST' 


PURPOSE 

LIST  A  PERMANENT  FILE 

FUNCTIONAL  CATEGORIES:  01 

COMPUTERS  (OPERATING  SYSTEMS) 

CDC  6000/CYBER  170  (NOS/BE) 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN , LIST , , PFN , ID, OUTPUT , 8 , RTN , SHIFT , PWl , PW2 , SN . 

DESCRIPTION  OF  PARAMETERS 

PFN  -  PERMANENT  FILE  NAME 

ID  -  ID  UNDER  WHICH  PFN  IS  CATALOGED 

OUTPUT  -  LISTABLE  OUTPUT 

8  -  PRINT  DENSITY 

OMITTED  OR  8  -  8  LINES  PER  INCH 
OTHER  -  6  LINES  PER  INCH 

RTN  -  LISTING  PROGRAM  DESIRED 
OMITTTED  -  COPYSF 

OTHER  -  LISTZ  (IN  LIBRARY  'UTILITY') 

SHIFT  -  NUMBER  OF  COLUMNS  TO  SHIFT  PRINTOUT  (DEFAULT:  1) 

(FOR  A  FILE  HAVING  CARRIAGE  CONTROL  IN  COLUMN  1  OF 
EACH  LINE,  USE  0  TO  USE  THOSE  CARRIAGE  CONTROL 
CHARACTERS) 

(SHIFT  IS  USED  ONLY  IF  RTN  IS  OMITTED) 

PW1.PW2  -  TK  AND  RD  PASSWORDS 
SN  -  SETNAME  (DEFAULT:  SYSSET) 

DEFAULT  BEGIN  STATEMENT 
LIST,*,, OUTPUT,, 8,, 1. 

(*  -  USER  MUST  SUPPLY) 

MAX  FL:  33000B 

REMARKS 

THIS  IS  SOMEWHAT  LIKE  THE  BURROUGHS  LIST  COMMAND  IN  THAT  IT 
WILL  ATTACH  THE  FILE  BEFORE  LISTING  IT  AND  RETURN  IT  AFTER. 

EXAMPLES 

1)  LIST  A  SEQUENTIAL  SOURCE  PROGRAM  OR  DATA  FILE  USING 
LISTZ: 

BEGIN, LIST, ,SOURCE/MYPROG,XXXX, , ,Z. 

2)  LIST  A  DOCUMENT  FILE: 

BEGIN, LIST, , DOC/MYPROG.XXXX, ,0. 
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AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 
DATE  WRITTEN:  09/25/80 
DATE (S)  REVISED 

02/25/81  -  GENERALIZE  AND  ADD  TO  PUBLIC  PROCEDURE  FILE 
12/17/82  -  SPLIT  PF  STATEMENTS  INTO  MULTIPLE  LINES  TO  AVOID 
POSSIBLE  PROBLEMS  AFTER  PARAMETER  SUBSTITUTION 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, .LIST, OUTPUT, MSACCES-<PASSWORD>. 
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PROCEDURE  'MANUAL' 


PURPOSE 

PRINT  ONE  COPY  OF  A  MANUAL  OR  ITS  REVISION  PAGES 

FUNCTIONAL  CATEGORIES:  01 

COMPUTERS  (OPERATING  SYSTEMS) 

CDC  6000/CYBER  170  (NOS/BE) 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

SYSTEM  PUBLIC-ACCESS  INTERACTIVE  PROCEDURE  FILE 

USAGE 

BEGIN , MANUAL ,, WHICH , REV , OUTPUT , PM , FID, X JOB , MSACCES . 

BEGIN .MANUAL, I ,<PARAMS>  <--  FOR  INTERACTIVE  VERSION 

BEGIN, MANUAL, I,?  <--  FOR  INTERACTIVE  PROCESSING 

DESCRIPTION  OF  PARAMETERS 

WHICH  -  NAME  OF  DESIRED  MANUAL 
CDC  SERIES: 

CLIB  (DEFAULT) 

REV  -  (CLIB  ONLY)  ONE  OF: 

OMITTED  OR  0  -  CLIB 

M  -  CLIB/M 

N  -  CLIB/N 

P  -  CLIB/P 

U  -  CLIB/U 

OUTPUT  -  LISTABLE  OUTPUT 

PM  -  OUTPUT  FORMAT.  ONE  OF: 

OMITTED  -  LEFT- JUSTIFIED,  WIDE  PAPER 
IT  -  LEFT- JUSTIFIED,  PM  MESSAGE 

FOR  NARROW  PAPER  FOR 
REMOTE  BATCH  TERMINALS 
C  -  CENTERED  ON  WIDE  PAPER 

FID  -  FILE  ID  FOR  ROUTING  TO  XEROX  8700 
(IF  OMITTED,  FILE  IS  NOT  ROUTED) 

XJOB  -  XEROX  8700  JOB  (IGNORED  IF  FID  OMITTED) 

ST4PRT  -  CONTINUOUS  PRINTOUT 
DOCPRT  -  EACH  CHAPTER  AND  DOCUMENT  START  ON 
A  NEW  MAGE 

MSACCES  -  MSACCES  PASSWORD 

(REQUIRED  ONLY  IF  NOT  SUBMITTED  EARLIER  IN  THIS 
BATCH  JOB  OR  INTERACTIVE  SESSION) 

DEFAULT  BEGIN  STATEMENT 

BEGIN, MANUAL, , CLIB, .OUTPUT. 

MAX  FL:  30000B 
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REMARKS 

NONE 


EXAMPLES 

1)  TO  PRINT  A  COPY  OF  CLIB/P: 

BEGIN, MANUAL, ,CLIB,P. 

2)  TO  PRINT  CLIB/N  ON  NARROW,  UNLINED  PAPER  AT  REMOTE 
TERMINAL  142: 

BEGIN, MANUAL, ,CLIB,N,OUT, IT. 

ROUTE , OUT , DC-PR , T ID- 1 42 , F I D=  * . 


AUTHOR 

DAVID  V.  SOMMER  -  DTNSRDC  1892.2 
DATE  WRITTEN:  08/21/79 
DATE (S)  REVISED 

12/09/80  -  'PM'  PARAMETER  EXPANDED  TO  ALLOW  CENTERING  OPTION 
01/23/81  -  EXPAND  TO  PRINT  CCLIB-SERIES  AND  CCBLIB-SERIES 
(REPLACES  PROCEDURES  'CCLIB'  AND  'CCBLIB') 
02/26/81  -  CHANGE  CCLIB  TO  CLIB,  CCBLIB  TO  BLIB 
11/15/82  -  FIX  PROCESSING  OF  'PM'  PARAMETER  TO  REMOVE  IT 
OUTPUT  WHEN  NOT  REQUESTED 

-  ADD  SUPPORT  FOR  CLIB/N5 

03/14/83  -  ADD  SUPPORT  FOK  CRM  AND  BRM  MINOR  PAGES 

-  CHANGE  FROM  USING  PROGRAM  PROGDOC  TO  GETDOC 
02/14/84  -  REMOVE  SUPPORT  FOR  BURROUGHS  MANUALS 
04/30/84  -  ADD  XEROX  8700  SUPPORT 

-  MAKE  INTERACTIVE 

08/30/84  -  PUT  INTERACTIVE  VERSION  INTO  INTEACTIVE  FILE 

-  PUT  NON-INTERACTIVE  VERSION  INTO  REGULAR  FILE 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, , MANUAL, OUTPUT, MSACCES-<PASSWORD> . 


08/30/84 


2-70 


’  ANUAL  -  2  OF  2 


PROCEDURE  'MFX' 


PURPOSE 

TELL  INTERACTIVE  USER  WHICH  MAINFRAME  HE  IS  USING 

FUNCTIONAL  CATEGORIES:  QO 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, MFX. 

DEFAULT  BEGIN  STATEMENT 
BEGIN, MFX. 

MAX  FL:  6000B 

REMARKS 

NONE 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  MID-1977 

DATE (S)  REVISED 

03/01/78  -  CONVERT  TO  CCL 
10/28/82  -  FIX  MFD  MESSAGE 

-  REMOVE  MFC  SUPPORT 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, , MFX, OUTPUT, MSACCES-<PASSWORD>. 
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PROCEDURE  'MF2MF' 


PURPOSE 

MOVE  ALL  FILES  FROM  ONE  MAINFRAME  TO  ANOTHER  VIA  THE  MASS 
STORAGE  SYSTEM 

FUNCTIONAL  CATEGORIES:  K1 

COMPUTERS  (OPERATING  SYSTEMS) 

CDC  6000/CYBER  170  (NOS/BE) 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  MSS  PROCEDURE  FILE 

EXECUTE  STATEMENT 

BEGIN , MF2MF , MSS , OPT , MSACCES , PW1 , PW2, PW3 , PW4 , PW5 , ID . 

DESCRIPTION  OF  PARAMETERS 
OPT  -  OPTION 

S  -  STORE  ALL  PERMANENT  FILES  ON  MSS 
R  -  RESTORE  ALL  PERMANENT  FILES  FROM  MSS 
PM  -  PURGE  THE  TEMPORARY  MSS  FILES 
PP  -  PURGE  THE  ORIGINAL  PERMANENT  FILES 

MSACCES  -  YOUR  MSACCES  PASSWORD  (OPT-S/R/PM) 

(REQUIRED  ONLY  IF  IT  HAS  NOT  ALREADY  BEEN 
SUBMITTED  IN  THIS  BATCH  JOB  OR  INTERACTIVE 
SESSION) 

PW1-PW5  -  TK,  RD,  AND  CN  PASSWORDS  (OPT*=S) 

ID  -  ID  UNDER  WHICH  THE  PERMANENT  FILES  ARE  CATALOGED 

(IF  OMITTED,  ID  IS  TAKEN  FROM  THE  CHARGE-CARD  OR 
LOGIN)  (OPT=S) 

DEFAULT  EXECUTE  STATEMENT 

NO  MEANINGFUL  DEFAULTS 

MAX  FL:  36000B 

REMARKS 

THIS  PROCEDURE  HAS  FOUR  OPTIONS  AND  PRODUCES  FIVE  PROCEDURES 
TO  DO  THE  ACTUAL  TRANSFER. 

USE  OPT-S  FIRST  TO  PUT  THE  PERMANENT  FILES  ONTO  THE  MSS. 

THEN,  ON  THE  DESTINATION  MAINFRAME,  USE  OPT=R  TO  RESTORE  THE 
FILES  FROM  MSS.  THE  FILES  WILL  BE  CATALOGED  WITH  THE  SAME 
ID,  AC  AND  CY  AS  THE  ORIGINAL  FILES.  ANY  PASSWORDS  WILL  BE 
LOST,  EXCEPT  FOR  SOME  NEW-CYCLE  CATALOGS. 

WHEN  YOU  ARE  SURE  ALL  THE  FILES  HAVE  BEEN  TRANSFERRED,  USE 
OPT-PM  TO  PURGE  THE  TEMPORARY  MSS  FILES  USED  FOR  THE 
TRANSFER  (THIS  MAY  BE  DONE  FROM  EITHER  MAINFRAME). 

ON  THE  ORIGINAL  MAINFRAME,  USE  OPT-PP  TO  PURGE  THE  ORIGINAL 
PERMANENT  FILES. 
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LASTLY,  IF  ANY  FILES  HAD  PASSWORDS,  THEY  MUST  BE  RE-DEFINED. 
TO  HELP  IN  THIS  PROCESS,  PROCEDURE  ADDXRTK  (STORE  IN  MSS 
FILE  ADDXRTK)  WILL  ATTACH  AND  RENAME  YOUR  FILES  TO  DEFINE 
THE  XR  AND  TK  PASSWORDS.  IF  YOU  DON’T  WANT  ALL  YOUR  FILES 
TO  HAVE  PASSWORDS,  OR  IF  YOU  WANT  TO  PUT  DIFFERENT  PASSWORDS 
ON  DIFFERENT  FILES,  YOU  CAN  USE  ONE  OF  THE  EDITORS  TO  DELETE 
OR  MODIFY  THIS  PROCEDURE  AS  YOU  WISH. 

FOR  EXAMPLE, 

MSFETCH, ADDXRTK 
NETED, ADDXRTK 
<MAKE  CHANGES > 

SAVE 

ADDXRTK 

WHEN  YOU  ARE  SURE  THIS  IS  DONE  AND  CORRECT,  PURGE  THE  MSS 
COPY  OF  THE  PROCEDURE  (MSPURGE, ADDXRTK) . 

ERROR  MESSAGES 

INVALID  MF2MF  OPTION  (<OPT>) 

THE  FIRST  PARAMETER  (OPT)  WAS  NOT  RECOGNIZED.  RE-EXECUTE 
WITH  A  VALID  OPTION  (S,  R,  PM,  PP) . 

NO  OPTION  SPECIFIED 

THE  FIRST  PARAMETER  (OPT)  WAS  OMITTED.  RE-EXECUTE  WITH 
A  VALID  OPTION  (S,  R,  PM,  PP) . 

EXAMPLES 

1)  PUT  ALL  MFE  FILES  ONTO  MSS  FOR  TRANSFER  TO  MFF  (DONE 
ON  MFE) : 

BEGIN , MF2MF , MSS , S , MYMSPW , , MYXR . 

2)  PUT  THE  MSS  FILES  ONTO  MFF  (DONE  ON  MFF) : 

BEGIN , MF2MF , MSS , R , MYMSPW . 

3)  PURGE  THE  MSS  FILES  (DONE  ON  ANY  MAINFRAME) : 

BEGIN , MF2MF , MSS , PM , MYMSPW . 

A)  PURGE  THE  MFE  FILES  (DONE  ON  MFE) : 

BEGIN, MF2MF, MSS, PP. 

5)  PUT  PASSWORDS  ONTO  CERTAIN  MFF  FILES  (DONE  ON  MFF): 
MSACCES, MYMSPW 
MSFETCH, ADDXRTK 
ATTACH, NETED 
NETED, ADDXRTK 
<MAKE  CHANGES > 

SAVE  <<  SAVE  MODIFIED  PROCEDURE 

ADDXRTK  <<  EXECUTE  PROCEDURE 

MSPURGE, ADDXRTK  <<  WHEN  YOU  ARE  DONE 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  06/17/83 

DATE (S)  REVISED 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, ,PROCFIL, ,MF2MF, OUTPUT, MSACCES-<PW>. 
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PROCEDURE  1 MNSRDC 1 
PURPOSE 

EXECUTE  A  PROGRAM  ON  EDITLIB  USER  LIBRARY  'MNSRDC1 

FUNCTIONAL  CATEGORIES:  LO  Q3 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN , MNSRDC , , PROG , PARAMS . 

DESCRIPTION  OF  PARAMETERS 

PROG  -  PROGRAM  TO  BE  EXECUTED 
PARAMS  -  UP  TO  19  PARAMETERS  FOR  'PROG' 

(KEYWORD  PARAMETERS  MUST  BE  $-DELIMITED,  E.G., 
$OPT-L$.) 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  DEPENDS  ON  PROGRAM  BEING  EXECUTED 

REMARKS 

NONE 

AUTHOR 

.  DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  07/25/77 

.DATE (S)  REVISED 

03/01/78  -  CONVERT  TO  CCL 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, .MNSRDC, OUTPUT, MSACCES=<PASSWORD> . 
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PROCEDURE  'MSAUDIT 


PURPOSE 

SORTED  LO-F  OR  FULL  LO-FP  AUDIT  OF  MSS  FILES 

FUNCTIONAL  CATEGORIES:  QO  SO  Ml 

COMPUTERS  (OPERATING  SYSTEMS) 

CDC  6000/CYBER  170  (NOS/BE) 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE  FOR  MASS  STORE 
USAGE 

BEGIN .MSAUDIT, MSS , LF-<OUTPUT> , UN-<UN> , LO" <  FORMAT  > , DA Y-  <DAY  > , 
PW. 

DESCRIPTION  OF  PARAMETER 
LF-  -  LISTABLE  OUTPUT 

UN*  -  USER  ID  TO  BE  AUDITED 

(MAY  NOT  BE  USED  WITH  LO-FP) 

LO-  -  AUDIT  FORMAT  (SIMILAR  TO  NOS/BE  AUDIT) . 

ONE  OF: 

S  -  SHORT  AUDIT  (LENGTH,  MFN,  CT,  M,  //  USES) 

I  -  INTERMEDIATE  AUDIT  (S  +  #  STREAMS,  CREATE 

AND  LAST  ACCESS  DATES, 
PW,  AC,  S/DAY) 

P  -  SAME  AS  F 

F  -  FULL  MSAUDIT  (3  LINES  PER  FILE) 

FP  -  COMPLETE  MSAUDIT  OF  ACCESSES  "0  ALL 
SEMI-PRIVATE  FILES 
(UN  MAY  NOT  BE  USED  WITH  LO-FP) 

DAY-  -  OFF  -  TURN  OFF  DAYFILE  MESSAGES  FOR  INDIVIDUAL 
MS AUDITS  FOR  LO-FP  (IT  COULD  GENERATE 
WALLPAPER).  HAS  NO  EFFECT  ON  OTHER  OPTIONS. 
ON  -  TURN  ON  DAYFILE  MESSAGES 
PW-  -  PW  -  FOR  L-F,  LIST  FILE  PASSWORDS,  IF  ANY 

OMITTED  -  DO  NOT  LIST  FILE  PASSWORDS 

DEFAULT  BEGIN  STATEMENT 

BEGIN , MSAUDIT , MSS , OUTPUT , LO-F , DAY-ON . 

MAX  FL:  41000B 

REMARKS 

FOR  LO-S/I/P/F:  AN  MSAUDIT, LO-F  IS  DONE  AND  PROGRAM  MSAUD 
REFORMATS  THE  MSAUDIT  OUTPUT. 

FOR  LO-FP:  AN  MSAUDIT, LO-F  IS  DONE.  PROGRAM  MSAUFPl 
EXTRACTS  NAMES  OF  SEMI-PRIVATE  FILES  AND  GENERATES  A  CCL 
PROCEDURE  TO  DO  AN  MSAUDIT, LO-FP  FOR  EACH  SEMI-PRIVATE 
FILE.  THE  GENERATED  PROCEDURE  IS  EXECUTED  (BY  THIS 
PROCEDURE)..  PROGRAM  MSAUFP2  THEN  REFORMATS  THIS  OUTPUT 
INTO  A  TABLE  OF  FILES  WHICH  HAVE  BEEN  ACCESSED  (BY  OTHER 
THAN  THE  OWNER)  AND  A  LIST  OF  THOSE  WHICH  HAVE  NOT  BEEN 
ACCESSED. 
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AD-A148  633  COMPUTER  CENTER  COC  L I BRAR I ES/PROCF I L  (PROCEDURES) (U) 
DAVID  U  TAVLOR  NAVAL  SHIP  RESEARCH  AND  DEVELOPMENT 
CENTER  BET. .  D  V  SOMMER  JUN  84  DTNSRDC/CMLD-84-13 

F/G  9/2 


UNCLASSIFIED 


NL 


ERROR  MESSAGES 

UN  NOT  ALLOWED  FOR  LO-FP 

LO-FP  MAY  BE  USED  ONLY  FOR  YOUR  CATALOG  (UN-  OMITTED) . 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  02/01/82 

DATE (S)  REVISED 

07/16/82  -  ADD  ’AI*  OPTION 

07/27/82  -  CHANGE  ’AI*  TO  ’LO’  TO  CONFORM  TO  MSS  USAGE 
-  ADD  LO-FP  OPTION 
09/07/84  -  ADD  'PW  OPTION 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, , MSAUDIT, OUTPUT, MSACCES-<PASSWORD> , 
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PROCEDURE  'MSSALL' 

PURPOSE 

GET  DOCUMENTS  DESCRIBING  PROCEDURES  RELATED  TO  THE  MASS 
STORAGE  SYSTEM  (MSS) 

FUNCTIONAL  CATEGORIES:  QO 

COMPUTERS  (OPERATING  SYSTEMS) 

CDC  6000/CYBER  170  (NOS/BE) 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE  FOR  MSS 
USAGE 

BEGIN , MSSALL , MSS , L , LO , COP I ES , MSACCES . 

DESCRIPTION  OF  PARAMETERS 
L  -  LISTABLE  OUTPUT 

LO  -  LIST  OPTION 

OMITTED  OR  LO-L  OR 

LO-LEFT  -  OUTPUT  IS  LEFT- JUSTIFIED 

ON  PAGE 

ANYTHING  ELSE  -  OUTPUT  IS  CENTERED  ON  WIDE 
PAPER 

COPIES  -  NUMBER  OF  COPIES 
MSACCES  -  YOUR  MSACCES  PASSWORD 

(REQUIRED  ONLY  IF  NOT  PREVIOUSLY  SUBMITTED  DURING 
.CURRENT  JOB  OR  INTERACTIVE  SESSION) 

DEFAULT  BEGIN  STATEMENT 

BEGIN , MSSALL , MSS , OUTPUT , L , 1 . 

BEGIN , MSSALL , MSS , L-OUTPUT , LO-L , COPIES- 1 . 

MAX  FL: 

REMARKS 

NONE 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 
DATE  WRITTEN:  08/05/82 
DATE (S)  REVISED 

02/10/84  -  ADD  MSACCES  PASSWORD  PARAMETER  SINCE  DOCUMENTS 
ARE  NOW  ON  THE  MSS 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, , MSSALL, OUTPUT, MSACCES-<PASSWORD>. 
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PROCEDURE  'MSS2PF' 


PURPOSE 

MOVE  ALL  YOUR  MSS  FILES  TO  PF 

FUNCTIONAL  CATEGORIES:  K1 

COMPUTERS  (OPERATING  SYSTEMS) 

CDC  6000/CYBER  170  (NOS/BE) 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE  FOR  MSS 
SYSTEM  PUBLIC-ACCESS  INTERACTIVE  PROCEDURE  FILE 

EXECUTE  STATEMENT 

BEGIN , MSS2PF , MSS , PRE , SN , MSACCES . 

BEGIN, MSS2PF, I,<PARAMS>  <--  FOR  INTERACTIVE  VERSION 

BEGIN , MSS2^F , I , ?  <—  FOR  INTERACTIVE  PROCESSING 

DESCRIPTION  OF  PARAMETERS 

PRE  -  OPTIONAL  PREFIX  FOR  PERMANENT  FILE  NAME 

OMITTED  -  PFN  *  MFN 
SPECIFIED  -  PFN  -  PRE_MFN 
SN  -  SETNAME 

OMITTED  -  CATALOG  IN  PERMANENT  FILE  SYSTEM 
SPECIFIED  -  CATALOG  ON  YOUR  PRIVATE  PACK 
MSACCES  -  MSS  ACCESS  PASSWORD 

(REQUIRED  ONLY  IF  NOT  PREVIOUSLY  SUBMITTED  DURING 
BATCH  JOB  OR  INTERACTIVE  SESSION) 

DEFAULT  EXECUTE  STATEMENT 

BEGIN , MSS2PF, MSS , PRE- , SN- , MSACCES- . 

MAX  FL:  15000B 

REMARKS 

IF  YOU  HAVE  A  LOT  OF  FILES  TO  TRANSFER,  YOU  MAY  WISH  TO  USE 
A  BATCH  JOB  AT  P2. 

METHOD 

THIS  PROCEDURE  WILL: 

1)  DO  AN  MSAUDIT. 

2)  RUN  UTILITY  PROGRAM  'MS2PF'  TO  CREATE  THE  PROCEDURE  TO 
DO  THE  ACTUAL  FILE  TRANSFERS. 

3)  RUN  THE  GENERATED  PROCEDURE. 
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AUTHORS 

DAVID  V.  SOMMER  -  DTNSRDC  CODE  1892.2  (PROCEDURE  MSS2PF) 
STANLEY  WILLNER  -  DTNSRDC  CODE  1892.1  (PROGRAM  MS2PF) 

DATE  WRITTEN:  04/19/84 

DATE (S)  REVISED 

05/15/84  -  MAKE  INTERACTIVE 

-  IF  SN  SPECIFIED,  MUST  RUN  IN  BATCH 
08/30/84  -  PUT  INTERACTIVE  VERSION  INTO  INTEACTIVE  FILE 

-  PUT  NON- INTERACTIVE  VERSION  INTO  REGULAR  FILE 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, ,PROCFIL, .MSS2PF, OUTPUT, MSACCES-<PASSWORD>. 
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PROCEDURE  'MSTABLE' 


PURPOSE 

GENERATE  TABLE/MFNPFN  INTERACTIVELY  FOR  MSS 
FUNCTIONAL  CATEGORIES:  QO 
LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE  FOR  MASS  STORE 
USAGE 

BEGIN, MSTABLE, MSS. 

DESCRIPTION  OF  PARAMETERS 
NONE 

DEFAULT  BEGIN  STATEMENT 
BEGIN, MSTABLE, MSS. 

MAX  FL: 

REMARKS 

THE  PROGRAM  IS  ENTIRELY  INTERACTIVE,  PROMPTING  THE  USER  FOR 
ALL  INFORMATION. 

OUTPUT  DESCRIPTION 

1)  A  PERMANENT  FILE  CALLED  TABLE/MFNPFN, ID-<USER ' S~ID> 
CONTAINING  MFN,  CT,  M,  PW,  NA,  LFN,  XR,  TK,  RD,  AND  AC 
FOR  USE  BY  PROCEDURES  C2M,  C2MALL ,  M2C,  AND  M2CALL .  THE 
FILE  WILL  HAVE  THE  FOLLOWING  FORMAT: 

COL  LEN  CONTENTS 

1  1  FLAG 

BLANK  -  DATA  ENTRY 
NON-BLANK  -  COMMENT  ENTRY 
3-9  7  MFN  (MASS  STORE  FILE  NAME) 

11-12  2  CT  (CATEGORY  TYPE:  P/PU/S) 

1A  1  M  (PERMISSION:  R/W) 

16-22  7  PW  (PASSWORD) 

2A  1  NA  (OVERWRITE:  0/1) 

26-65  AO  PFN  (CDC  PERMANENT  FILE  NAME) 

67-75  9  XR  (PASSWORD) 

77-85  9  TK  (PASSWORD) 

87-95  9  RD  (PASSWORD) 

97-106  10  AC  (JOB  ORDER  NUMBER) 

2)  AN  OPTIONAL  LISTING  OF  THIS  FILE. 
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METHOD 

PROCEDURE  MSTABLE  RUNS  INTERACTIVE  PROGRAM  MSTBL  WHICH  DOES 
THE  FOLLOWING: 

AFTER  GREETING  THE  USER,  INSTRUCTIONS  ARE  TYPED,  IF 
REQUESTED. 

THE  USER  IS  NEXT  ASKED  IF  A  NEW  TABLE  IS  TO  BE  CREATED  OR 
AN  OLD  ONE  EXPANDED.  THE  TK  AND  RD  PASSWORDS  FOR  THE  FILE 
MUST  BE  ENTERED.  IF  AN  OLD  TABLE  IS  BEING  EXPANDED,  IT  IS 
ATTACHED  BY  THE  PROGRAM. 

BEFORE  CREATING  OR  ADDING  TO  A  TABLE,  THE  USER  HAS  THE 
OPPORTUNITY  TO  PRE-DEFINE  PARAMETERS.  THESE  PRE-DEFINED 
VALUES  ARE  USED  WHILE  CREATING  ENTRIES.  THOSE  NOT  PRE¬ 
DEFINED  MUST  BE  REQUESTED  INDIVIDUALLY  FOR  EACH  ENTRY.  A 
MENU  IS  PRESENTED  TO  THE  USER  WHO  SELECTS  AN  ITEM  AND  IS 
THEN  ASKED  FOR  A  VALU'E.  THE  USER  MAY  DEFINE,  CHANGE  AND/OR 
DELETE  ANY  ITEMS  UNTIL  SIGNALLING  THAT  HE  IS  DONE.  THERE  IS 
ONE  SHORTHAND  ITEM  TO  DEFINE  ALL  THE  MSS  VALUES  AS  THE 
SYSTEM  DEFAULTS.  SINCE  USERS  MAY  HAVE  MORE  THAN  ONE  JOB 
ORDER  NUMBER  AND  TO  ELIMINATE  THE  NEED  TO  EITHER  PICK  ONE  AS 
THE  DEFAULT  FOR  ALL  FILES  OR  TO  TYPE  IN  10  DIGITS  FOR  EACH 
ENTRY,  USERS  MAY  PRE-DEFINE  UP  TO  THREE  JOB  ORDER  NUMBERS  TO 
BE  REPRESENTED  BY  A  SINGLE  DIGIT.  TOGETHER  WITH  ’+',  WHICH 
REPRESENTS  THE  LOGIN  JOB  ORDER  NUMBER,  THIS  GIVES  FOUR  JOB 
ORDER  NUMBERS  WHICH  CAN  BE  ENTERED  BY  A  SINGLE  CHARACTER. 
(NOTE  THAT  TO  TAKE  ADVANTAGE  OF  THIS,  A  DEFAULT  MUST  NOT  BE 
SPECIFIED  FOR  AC,  JUST  FOR  1,  2  AND/OR  3.) 

THE  MENU  HAS  AN  OPTION  TO  LIST  THE  PARAMETERS  THE  USER  HAS 
PRE-DEFINED.  IT  ALSO  HAS  AN  OPTION  TO  RE-TYPE  THE  MENU. 

THE  MENU  SHOWS  ANY  DEFAULT  VALUES  WHICH  THE  USER  HAS  ALREADY 
DEFINED. 

AFTER  THE  DEFAULTS  HAVE  BEEN  DEFINED,  THE  USER  IS  ASKED  FOR 
THE  DATA  TO  MAKE  THE  INDIVIDUAL  ENTRIES  IN  THE  TABLE: 

MFN  -  MASS  STORE  FILE  NAME 

(107  ALPHANUMERIC  CHARACTERS,  FIRST  ALPHABETIC) 

PFN  -  CDC  PERMANENT  FILE  NAME 

(0-40  CHARACTERS;  IF  OMITTED,  PFN'MFN) 

ANY  PARAMETERS  WHICH  DO  NOT  HAVE  PRE-DEFINED  VALUES 

ENTRIES  TO  THE  TABLE  ARE  TERMINATED  BY  SPECIFYING  MFN-END. 

AFTER  THE  LAST  NEW  ENTRY,  FOUR  COMMENT  RECORDS  OF  COLUMN 
MARKERS  ARE  ADDED  TO  HELP  READ  A  LISTING  OF  THE  TABLE.  IN 
ADDITION,  IF  IT  IS  A  NEW  TABLE,  THESE  SAME  COMMENTS  ARE 
PUT  AT  THE  START  OF  THE  TABLE. 

WHEN  THE  TABLE  HAS  BEEN  COMPLETED,  THE  USER  MAY  REQUEST  A 
LIST  (THE  FILE  TO  RECEIVE  THE  LIST  MUST  BE  SPECIFIED). 

THE  LISTING  IS  113  COLUMNS  WIDE. 

THE  PROGRAM  CATALOGS  THE  NEW  TABLE  IF  AT  LEAST  ONE  NEW 
ENTRY  WAS  MADE.  IF  THE  CATALOG  WAS  SUCCESSFUL  AND  AN  OLD 
TABLE  WAS  EXPANDED,  THE  USER  MAY  REQUEST  THE  PROGRAM  TO 
PURGE  THE  OLD  TABLE. 
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THE  PROGRAM  RECOGNIZES  THREE  SPECIAL  ENTRIES  IN  RESPONSE  TO 
ANY  QUESTON: 

@  -  STOP  THE  PROGRAM  IMMEDIATELY 

(NO  CATALOG  OR  PURGE  IS  ATTEMPTED) 

?  -  ASK  FOR  A  MORE  DETAILED  DESCRIPTION  OF  THE 

CURRENT  ITEM 

..  -  TYPE  A  LINE  OF  COLUMN  MARKERS  SHOWING  THE 
LENGTH  OF  THE  CURRENT  ITEM 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  02/05/82 

DATE (S)  REVISED 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, .MSTABLE, OUTPUT, MSACCES-<PASSWORD> . 
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PROCEDURE  ' MYPRO ' 


PURPOSE 

EXECUTE  A  PROCEDURE  ON  FILE  'PROCFIL'  CATALOGED  UNDER  ANY  ID 

FUNCTIONAL  CATEGORIES:  LO  Q3 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, MYPRO, , ID, PNAME, PARAMS. 

DESCRIPTION  OF  PARAMETERS 

ID  -  ID  UNDER  WHICH  PROCEDURE  FILE  IS  CATALOGED 

(PFN  MUST  BE  'PROCFIL') 

PNAME  -  PROCEDURE  NAME 

PARAMS  -  UP  TO  18  PARAMETERS  FOR  PROCEDURE  'PNAME' 

(KEYWORD  PARAMETERS  MUST  BE  $~DELIMITED,  E.G., 
$OPT«L$.) 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

1JAX  FL:  DEPENDS  UPON  PROCEDURE  BEING  EXECUTED 

REMARKS 

SEE  ALSO  PROCEDURES  'ANYPRO' ,  'ANYPROS',  'LIBPRO', 

' LIBPROA' ,  'MYPROS ' . 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  07/21/76 

DATE(S)  REVISED 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, , MYPRO, OUTPUT, MSACCES-<PASSWORD>. 
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PROCEDURE  'MYPROS ' 


PURPOSE 

EXECUTE  A  PROCEDURE  ON  SEQUENTIAL  FILE  'PROCFILS'  CATALOGED 
UNDER  ANY  ID 

FUNCTIONAL  CATEGORIES:  LO  Q3 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, MYPROS, , ID, PNAME , PARAMS . 

DESCRIPTION  OF  PARAMETERS 

ID  -  ID  UNDER  WHICH  SEQUENTIAL  PROCEDURE  FILE  IS 

CATALOGED  (PFN  MUST  BE  'PROCFILS') 

PNAME  -  PROCEDURE  NAME 

PARAMS  -  UP  TO  18  PARAMETERS  FOR  PROCEDURE  'PNAME' 

(KEYWORD  PARAMETERS  MUST  BE  $~DELIMITED,  E.G., 
$OPT-L$.) 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  DEPENDS  UPON  PROCEDURE  BEING  EXECUTED 

REMARKS 

SEE  ALSO  PROCEDURES  'ANYPRO',  'ANYPROS',  'LIBPRO', 

' LIBPROA' ,  'MYPRO' . 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  03/27/78 

DATE (S)  REVISED 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN , DOCGET , , PROCF I L , , MYPROS , OUTPUT , MSACCES-<PASSWORD> . 
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PROCEDURE  'M2C' 


PURPOSE 

TRANSFER  ONE  MSS  FILE  (OF  EXECUTING  USER)  TO  A  CDC  PERMANENT 
FILE  (BASED  ON  USER'S  CDC  FILE  TABLE/MFNPFN) 

FUNCTIONAL  CATEGORIES:  K1  00 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE  FOR  MSS 

COMPUTERS  (OPERATING  SYSTEMS) 

CDC  6000/CYBER  170  (NOS/BE) 

USAGE 

BEGIN , M2C , MSS , TBLTR, PFN , XR , TK , RD . 

DESCRIPTION  OF  PARAMETERS 

TBLTK  -  TK  PASSWORD  FOR  TABLE/MFNPFN 

PFN  -  CDC  PERMANENT  FILE  TO  BE  FETCHED 

XR  -  XR  PASSWORD  ON  CDC  PERMANENT  FILE  * 

TK  -  TK  PASSWORD  ON  CDC  PERMANENT  FILE  * 

RD  -  RD  PASSWORD  ON  CDC  PERMANENT  FILE  * 

(*  -  IF  OMITTED,  TAKEN  FROM  TABLE/MFNPFN) 

DEFAULT  BEGIN  STATEMENT 
BEGIN, M2C, MSS,,*. 

(*  -  USER  MUST  SUPPLY) 

MAX  FL:  26000B 

REMARKS 

A  FILE  RELATING  MFN  TO  PFN  MUST  BE  CREATED  BY  THE  USER  AND 
CATALOGED  WITH  CDC  PERMANENT  FILE  NAME  'TABLE/MFNPFN'  UNDER 
THE  EXECUTING  USER'S  ID.  IT  SHOULD  HAVE  A  TK  PASSWORD.  THE 
FILE  FORMAT  IS  DESCRIBED  BELOW. 

THIS  PROCEDURE  EXECUTES  UTILITY  PROGRAM  ' XFRM2C ' . 

SEE  ALSO  PROCEDURES  ' GETMS ' ,  'M2C' ;  'PUTMS',  'C2M' , 

' C2MALL ' . 

PROCEDURE  'MSTABLE'  MAY  BE  USED  TO  CREATE/EXPAND  A  TABLE. 
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DATA  CARDS  IN  FILE  TABLE/MFNPFN, ID-<USER  ID> 
COL  CONTENTS 


1  FLAG 

BLANK  -  DATA  CARD 
NON-BLANK  -  COMMENT  CARD 

3-9  MFN 

26-65  PFN 

(THE  PROGRAM  WILL  PUT  $...$  AROUND  EACH  PFN) 
67-75  DEFAULT  XR  PASSWORD 

77-85  DEFAULT  TK  PASSWORD 

87-95  DEFAULT  RD  PASSWORD 

97-106  DEFAULT  AC  (JOB  ORDER  NUMBER) 

ERROR  MESSAGES  (PROGRAM  XFRM2C) 

MFN  MUST  BE  SPECIFIED 
SELF-EXPLANATORY. 

MFN  TOO  LONG  -  7  CHAR  MAX 
SELF-EXPLANATORY. 

RD  TOO  LONG  -  9  CHAR  MAX 
SELF-EXPLANATORY. 

TBLTK  TOO  LONG  -  9  CHAR  MAX 
SELF-EXPLANATORY. 

TK  TOO  LONG  -  9  CHAR  MAX 
SELF-EXPLANATORY. 

UNABLE  TO  ATTACH  TABLE/MFNPFN 
<REASON> 

SHOULD  BE  SELF-EXPLANATORY. 

UNRECOGNIZED  PARAMETER  //  <N>  (<PARAMETER>)  IGNORED 
UNRECOGNIZED  EXECUTE  PARAMETER.  IGNORED. 

XR  TOO  LONG  -  9  CHAR  MAX 
SELF-EXPLANATORY. 

MESSAGES  (GENERATED  PROCEDURE  XM2C) 

MSS  FILE  <MFN> 

CATALOGED  AS 
<PFN> 

ID-<YOUR  ID> 

TRANSFER  WAS  SUCCESSFUL. 

MS FETCH  OF  <MFN> 

OR  CATALOG  AS 
<PFN> 

ID*=<YOUR  ID> 

FAILED  - 

PREVIOUS  SYSTEM  MESSAGES  SHOULD  IDENTIFY  THE  PROBLEM. 
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EXAMPLES 

1)  GET  YOUR  CDC  FILE  ' SOURCE/MYPROG '  FROM  MSS  USING  DEFAULT 
PASSWORDS  FROM  TABLE/MFNPFN: 

BEGIN , M2C , MSS , MYTBLTK , SSOURCE/MYPROGS . 

2)  GET  YOUR  CDC  FILE  1 OTHRPRG'  FROM  MSS.  THE  CDC  FILE  MAY 
ALREADY  EXIST  AND  HAVE  XR-MYXR: 

BEGIN , M2C , MSS , MYTBLTK , OTHRPRG , MYXR . 


AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  01/13/82 

DATE (S)  REVISED 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN , DOCGET , , PROCFI L M2C , OUTPUT , MSACCES“<PASSWORD> . 
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PROCEDURE  'M2CALL 


PURPOSE 

TRANSFER  ALL  MSS  FILES  (OF  EXECUTING  USER)  TO  CDC  (BASED  ON 
USER'S  FILE  TABLE/MFNPFN) 

FUNCTIONAL  CATEGORIES:  K1  QO 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE  FOR  MSS 

COMPUTERS  (OPERATING  SYSTEMS) 

CDC  6000/CYBER  170  (NOS/BE) 

USAGE 

BEGIN , M2CALL , MSS , TBLTK , XR , TK , RD . 

DESCRIPTION  OF  PARAMETERS 

TBLTK  -  TK  PASSWORD  FOR  TABLE/MFNPFN 

XR  -  XR  PASSWORD  FOR  CDC  PERMANENT  FILE  * 

TK  -  TK  PASSWORD  FOR  CDC  PERMANENT  FILE  * 

RD  -  RD  PASSWORD  FOR  CDC  PERMANENT  FILE  * 

(*  -  IF  OMITTED,  TAKEN  FROM  TABLE/MFNPFN) 

DEFAULT  BEGIN  STATEMENT 
BEGIN, M2CALL, MSS. 

MAX  FL:  26000B 

REMARKS 

A  FILE  RELATING  MFN  TO  PFN  MUST  BE  CREATED  BY  THE  USER  AND 
CATALOGED  WITH  CDC  PERMANENT  FILE  NAME  'TABLE/MFNPFN'  UNDER 
THE  EXECUTING  USER'S  ID.  IT  SHOULD  HAVE  A  TK  PASSWORD.  THE 
FILE  FORMAT  IS  DESCRIBED  BELOW. 

THIS  PROCEDURE  EXECUTES  UTILITY  PROGRAM  'XFRM2CA' . 

SEE  ALSO  PROCEDURES  'GETMS ' ,  'M2C' ;  'PUTMS',  'C2M' , 

’ C2MALL ' . 

PROCEDURE  'MSTABLE'  MAY  BE  USED  TO  CREATE/EXPAND  A  TABLE. 

DATA  CARDS  IN  FILE  TABLE/MFNPFN , ID-<USER  ID> 

COL  CONTENTS 


1  FLAG 

BLANK  -  DATA  CARD 
NON-BLANK  -  COMMENT  CARD 
3-9  MFN 

26-65  PFN 

(THE  PROGRAM  WILL  PUT  $...$  AROUND  EACH  PFN) 
67-75  DEFAULT  XR  PASSWORD 

77-85  DEFAULT  TK  PASSWORD 

87-95  DEFAULT  RD  PASSWORD 

97-106  DEFAULT  AC  (JOB  ORDER  NUMBER) 
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ERROR  MESSAGES  (PROGRAM  XFRM2CA) 

RD  TOO  LONG  -  9  CHAR  MAX 
SELF-EXPLANATORY 

TBLTK  TOO  LONG  -  9  CHAR  MAX 
SELF-EXPLANATORY 

TK  TOO  LONG  -  9  CHAR  MAX 
SELF-EXPLANATORY 

UNABLE  TO  ATTACH  TABLE/MFNPFN 
<REASON> 

SHOULD  BE  SELF-EXPLANATORY 

UNRECOGNIZED  PARAMETER  #  <N>  (<PARAMETER>)  IGNORED 
UNRECOGNIZED  EXECUTE  PARAMETER.  IGNORED. 

XR  TOO  LONG  -  9  CHAR  MAX 
SELF-EXPLANATORY 

EXAMPLES 

1)  TRANSFER  YOUR  MSS  FILES  TO  CDC  USING  DEFAULT  PASSWORDS 
FROM  FILE  TABLE/MFNPFN: 

BEGIN , M2CALL , MSS , MYTBLTK . 

2)  TRANSFER  YOUR  MSS  FILES  TO  CDC  PUTTING  XR  PASSWORD 
(XR-MYXR)  ON  ALL  FILES: 

BEGIN , M2CALL , MSS , MYTBLTK , MYXR . 


AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  01/13/82 

DATE(S)  REVISED 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, , M2CALL , OUTPUT , MSACCES“<PASSWORD> . 
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PROCEDURE  'NEWID' 


PURPOSE 

RENAME  ID  ON  ONE  PERMANENT  FILE  (BY  COPYING  THE  FILE) 

FUNCTIONAL  CATEGORIES:  Q4 

COMPUTERS  (OPERATING  SYSTEMS) 

CDC  6000/CYBER  170  (NOS/BE) 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

SYSTEM  PUBLIC-ACCESS  INTERACTIVE  PROCEDURE  FILE 

USAGE 

BEGIN , NEWID , , PFN , ID, NEWID , PW1 , PW2 , PW3 , PW4 , PW3 , XR , AC . 

BEGIN, NEWID, I, <PARAMS>  <—  FOR  INTERACTIVE  VERSION 

BEGIN, NEWID, I,?  <—  FOR  INTERACTIVE  PROCESSING 

DESCRIPTION  OF  PARAMETERS 

PFN  -  PERMANENT  FILE  TO  BE  RENAMED 
ID  -  ID  UNDER  WHICH  PFN  IS  NOW  CATALOGED 

NEWID  -  ID  UNDER  WHICH  PFN  IS  TO  BE  CATALOGED 

PW1-PW5  -  PASSWORDS  FOR  ATTACHING  THE  FILE 
(ONLY  CN,  RD  AND  TK  REQUIRED) 

XR  -  OPTIONAL  XR  PASSWORD  TO  BE  PUT  ONTO  THE  FILE 

AC  -  OPTIONAL  AC  TO  BE  PUT  ONTO  THE  FILE 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  20000B 

REMARKS 

SINCE  THE  PUBLIC  PERMANENT  FILE  SYSTEM  WAS  SPLIT  ONTO  TWO 
SETNAMES,  IT  IS  NOT  POSSIBLE  TO  RENAME  FILES  USING  A  SIMPLE 
RENAME  STATEMENT.  INSTEAD,  EACH  FILE  MUST  BE  COPIED  AND 
CATALOGED,  AND  THE  ORIGINAL  FILE  PURGED. 

THIS  PROCEDURE  WILL  ATTACH  A  SINGLE  PERMANENT  FILE,  COPY  AND 
CATALOG  IT  AND  PURGE  THE  ORIGINAL. 

TO  RENAME  THE  ID  ON  ALL  FILES,  USE  PROCEDURE  'RENAMID'. 
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ERROR  MESSAGES 

ID  AND  NEWID  ARE  THE  SAME 
NO  RENAME  NEEDED 
SELF-EXPLANATORY. 

EXAMPLES 

1)  CHANGE  URID'S  FILE  ABC  TO  MYID.  THERE  IS  ONLY  ONE 
PASSWORD  AND  THE  FILE  IS  TO  RECEIVE  AN  XR  PASSWORD  OF 
MYXR: 

BEGIN, NEWID, , ABC, URID, MYID, XR-MYXR. 

2)  CHANGE  URID'S  FILE  ABC  TO  MYID.  THERE  ARE  3  PASSWORDS  ON 
THE  FILE  AND  IT  IS  TO  RECEIVE  AN  XR  PASSWORD  OF  MYXR  AND 
AN  AC  OF  1234567890. 

BEGIN , NEWID ,, ABC , UR ID , MYID, URXR , URTK , URXRD, MYXR , 
1234567890. 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 
DATE  WRITTEN:  02/23/82 
DATE (S)  REVISED 

12/17/82  -  SPLIT  PF  STATEMENTS  INTO  MULTIPLE  LINES  TO  AVOID 
POSSIBLE  PROBLEMS  AFTER  PARAMETER  SUBSTITUTION 
04/26/84  -  MAKE  INTERACTIVE 

08/30/84  -  PUT  INTERACTIVE  VERSION  INTO  INTEACTIVE  FILE 
-  PUT  NON-INTERACTIVE  VERSION  INTO  REGULAR  FILE 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, , NEWID, OUTPUT, MSACCES-<PASSWORD>. 
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PROCEDURE  'NOGO' 


PURPOSE 

CREATE  SIMPLE  ABSOLUTE  FROM  RELOCATABLE 

FUNCTIONAL  CATEGORIES:  LO  Q3 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 


USAGE 

BEGIN, NOGO, ,LGO,ABS. 

DESCRIPTION  OF  PARAMETERS 

LGO  -  RELOCATABLE  PROGRAM 

ABS  -  RESULTING  ABSOLUTE  MODULE 

(MAY  BE  CATALOGED). 


DEFAULT  BEGIN  STATEMENT 
BEGIN, NOGO, , LGO, ABS. 

MAX  FL:  DEPENDS  UPON  PROGRAM  BEING  LOADED 

REMARKS 

NONE 


AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 


DATE  WRITTEN:  04/21/76 

DATE (S)  REVISED 

03/01/78  -  CONVERT  TO  CCL 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, , NOGO, OUTPUT, MSACCES-<PASSWORD>. 
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PROCEDURE  'NORERUN 


PURPOSE 

INSURE  THAT  A  BATCH  JOB  CANNOT  BE  RERUN  BY  OPERATOR 
TYPE-IN 

FUNCTIONAL  CATEGORIES:  QO 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, NORERUN. 

DEFAULT  BEGIN  STATEMENT 
BEGIN, NORERUN. 

MAX  FL:  4500B 

REMARKS 

THIS  PROCEDURE  WILL  CATALOG  AND  PURGE  A  DUMMY  FILE. 
ERROR  MESSAGES 

SORRY  -  NORERUN  IS  FOR  BATCH  ONLY 

TRIED  TO  EXECUTE  PROCEDURE  OUTSIDE  OF  BATCH 


AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 


DATE  WRITTEN:  06/14/77 

DATE (S)  REVISED 

03/01/78  -  CONVERT  TO  CCL 


ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, .NORERUN, OUTPUT, MSACCES-<PASSWORD>. 
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PROCEDURE  ' OFLREQ ' 


PURPOSE 

GENERATE  AN  OFF-LINE  REQUEST  (CALCOMP  OR  MICROFICHE) 

FUNCTIONAL  CATEGORIES:  QO 

COMPUTERS  (OPERATING  SYSTEMS) 

CDC  6000/CYBER  170  (NOS/BE) 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, OFLREQ, .TYPE. 

DESCRIPTION  OF  PARAMETER 

TYPE  -  TYPE  OF  OFF-LINE  REQUEST  DESIRED 

936  OR  '"ALCOMP  -  CALCOMP  936 

1051  -  CALCOMP  1051 

COM  -  COM  (MICROFICHE) 

DEFAULT  BEGIN  STATEMENT 
BEGIN, OFLREQ,, 936. 

MAX  FL:  40000B 

REMARKS 

IF  YOU  GIVE  AN  INVALID  TYPE,  THE  PROGRAM  THIS  PROCEDURE 
EXECUTES  WILL  ASK  YOU  FOR  THE  CORRECT  TYPE. 

THE  PROGRAM  WILL  ROUTE  A  COPY  OF  THE  GENERATED  REQUEST  FORM 
AS  WELL  AS  GIVE  YOU  A  COPY  IN  FILE  ’FORM’. 

WHEN  RUN  FROM  BATCH,  INPUT  IS  READ  FROM  FILE  ' KEYBRD' .  ALL 
ENTRIES  MUST  BE  VALID,  SINCE  CHECKING  IS  THE  SAME  AS  WHEN 
RUN  INTERACTIVELY.  THE  PROMPTING  MESSAGES  ARE  WRITTEN  ONTO 
FILE  'CONSOL',  WHICH  MAY  BE  REWOUND  AND  COPIED  TO  OUTPUT,  IF 
DESIRED.  A  COPY  OF  THE  ROUTED  FORM  WILL  BE  ON  FILE  'FORM', 
WHICH  IS  REWOUND,  AND  MAY  BE  COPIED  TO  OUTPUT,  IF  DESIRED. 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 
DATE  WRITTEN:  09/02/81 
DATE(S)  REVISED 

10/13/81  ~  VI. 1  -  ALLOW  BATCH  EXECUTION 

12/12/83  -  VI. 2  -  CHANGE  MFB  TO  MFE  IN  PROGRAM  EXECUTED  BY 
THIS  PROCEDURE 

03/06/84  -  VI. 3  -  CORRECT  DETERMINATION  OF  BATCH/INTERACTIVE 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, .OFLREQ, OUTPUT, MSACCES-<PASSWORD>. 
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PROCEDURE  'PA C' 


04/30/84 


PURPOSE 

PURGE  ALL  CYCLES  OF  A  FILE 

FUNCTIONAL  CATEGORIES:  Q4 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, PAC..PFN, ID, PW1,PW2,PW3,PW4,PW5,SN,UV. 

DESCRIPTION  OF  PARAMETERS 

PFN  -  PERMANENT  FILE  NAME 

ID  -  ID 

PW1-PW5  -  UP  TO  5  PASSWORDS 

SN  -  SETNAME  (DEFAULT:  SYSSET) 

UV  -  UNIVERSAL  PASSWORD  (FOR  USER  DEVICE  SETS) 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  15000B 

REMARKS 

NONE 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 
DATE  WRITTEN:  01/27/80 
DATE (S)  REVISED 

02/24/81  -  ADD  SN  AND  UV  PARAMETERS 

12/17/82  -  SPLIT  PF  STATEMENTS  INTO  MULTIPLE  LINES  TO  AVOID 
POSSIBLE  PROBLEMS  AFTER  PARAMETER  SUBSTITUTION 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, ,PAC, OUTPUT, MSACCES-<PASSWORD>. 


2-95 


PAC  -  1  OF  1 


PROCEDURE  ' PAHC ' 


PURPOSE 

PURGE  ALL  HIGH  CYCLES  WHILE  RETAINING  LOW  CYCLE 

FUNCTIONAL  CATEGORIES:  Q4 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN , PAHC , , PFN , ID, PW1 , PW2 , PW3 , PW4 , PW5 , SN , UV . 

DESCRIPTION  OF  PARAMETERS 

PFN  -  PERMANENT  FILE  NAME 

ID  -  ID 

PW1-PW5  -  UP  TO  5  PASSWORDS 

SN  -  SETNAME  (DEFAULT:  SYSSET) 

UV  -  UNIVERSAL  PASSWORD  (FOR  USER  DEVICE  SETS) 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  15000B 

REMARKS 

NONE 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 
DATE  WRITTEN:  01/27/80 
DATE(S)  REVISED 

02/24/81  -  ADD  SN  AND  UV  PARAMETERS 

12/17/82  -  SPLIT  PF  STATEMENTS  INTO  MULTIPLE  LINES  TO  AVOID 
POSSIBLE  PROBLEMS  AFTER  PARAMETER  SUBSTITUTION 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, , PAHC, OUTPUT, MSACCES=<PASSWORD>. 
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PROCEDURE  'PAKPAS' 


PURPOSE 

CHANGE  PRIVATE  PACK  PASSWORDS,  OPTIONALLY  ADD  EXTEND 
PASSWORD  TO  PRE-LEVEL  508  PACKS 

FUNCTIONAL  CATEGORIES:  QO 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, PAKPAS, ,VSN,SN, RD.MD.CN, EX, NRD, NMD, NCN.NEX.UTK.PB. 

DESCRIPTION  OF  PARAMETERS 

VSN  -  PACK  VOLUME  SERIAL  NUMBER 
SN  -  SETNAME 

RD  -  EXISTING  READ  PASSWORD 

MD  -  EXISTING  MODIFY  PASSWORD 

CN  -  EXISTING  CONTROL  PASSWORD 

EX  -  EXISTING  EXTEND  PASSWORD,  OMIT  IF  NONE 

NRD  -  NEW  READ  PASSWORD 

NMD  -  NEW  MODIFY  PASSWORD 

NCN  -  NEW  CONTROL  PASSWORD 

NEX  -  NEW  EXTEND  PASSWORD 

UTK  -  USER  TURNKEY  (IF  ANY) 

PB  -  OMIT  FOR  LEVEL  508  (AND  AFTER)  PACKS  HAVING  NO  USER 
PUBLIC  PASSWORD.  IF  USED,  MUST  BE  IN  KEYWORD  FORM: 
PB-USERPUBLIC  WHERE  USER  HAS  OWN  PB  PASSWORD 
PB  WHERE  PACK  WAS  INITIALIZED  BEFORE  508 

DEFAULT  BEGIN  STATEMENT 
NO  MEANINGFUL  DEFAULTS 

MAX  FL:  20000B 

REMARKS 

WHEN  PB  PARAMETER  IS  USED,  THE  LETTERS  PB  ARE  REQUIRED. 
EXAMPLES 

1.  ALTER  OLD  RD,MD,CN  PASSWORDS  AND  ADD  EXTEND  PASSWORD  TO 
SET  INITIALIZED  BEFORE  LEVEL  508: 

BEGIN, PAKPAS, ,DV9999,MYSET,MYRD,MYMD,MYCN, ,NEWRD, 
NEWMD , NEWCN , NEWEXT , PB . 

2.  ALTER  ALL  A  PASSWORDS  ON  PACK  HAVING  USER  TURNKEY 
SET  INITIALIZED  AFTER  LEVEL  508  SYSTEM  WAS  INSTALLED: 

BEGIN , PAKPAS , , DV9998 , ASETNAME , OLDRD , OLDMD , OLDCN , 
OLDEX , RDNEW , MDNEW , CNNEW , EXNEW , MYTK . 

3.  ALTER  ALL  A  PASSWORDS  ON  PACK  HAVING  USER-SELECTED  PB 
PASSWORD  (ONLY  AVAILABLE  BEGINNING  AT  LEVEL  508): 

BEGIN , PAKPAS , , <VSN> , <SN> , RDO , MDO , CNO , EXO , RDN , MDN , 
CNN, EXN , PB*MYPBPASS . 
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AUTHOR 

SHARON  E  GOOD  -  DTNSRDC  CODE  1892.1 

DATE  WRITTEN:  09/23/81 

DATE (S)  REVISED 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, .PAKPAS, OUTPUT, MSACCES“<PASSWORD>. 
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PROCEDURE  'PALC' 

PURPOSE 

PURGE  ALL  LOW  CYCLES  WHILE  RETAINING  HIGH  CYCLE 


FUNCTIONAL  CATEGORIES:  Q4 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN , PALC , , PFN , ID , PW1 , PW2 , P W3 , PW4 , PW5 , SN , U V . 

DESCRIPTION  OF  PARAMETERS 

PFN  -  PERMANENT  FILE  NAME 

ID  -  ID 

PW1-PW5  -  UP  TO  5  PASSWORDS 

SN  -  SETNAME  (DEFAULT:  SYSSET) 

UV  -  UNIVERSAL  PASSWORD  (FOR  USER  DEVICE  SETS) 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  15000B 

REMARKS 

NONE 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 
DATE  WRITTEN:  01/27/80 
DATE (S)  REVISED 

02/24/81  -  ADD  SN  AND  UV  PARAMETERS 

12/17/82  -  SPLIT  PF  STATEMENTS  INTO  MULTIPLE  LINES  TO  AVOID 
POSSIBLE  PROBLEMS  AFTER  PARAMETER  SUBSTITUTION 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, , PALC, OUTPUT, MSACCES-<PASSWORD>. 
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PROCEDURE  ' PARMGET 


PURPOSE 

GENERATE  SUBROUTINE  ’PARMGET’  TO  PROCESS  USER  EXECUTE 
PARAMETERS  FOR  FTN5  PROGRAMS 

FUNCTIONAL  CATEGORIES:  QO 

COMPUTERS  (OPERATING  SYSTEMS) 

CDC  6000/CYBER  170  (NOS/BE) 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN , PARMGET , , LFN , PARMLEN , VALULEN , SHORT . 

DESCRIPTION  OF  PARAMETERS 

LFN  -  LFN  OF  FILE  TO  CONTAIN  THE  GENERATED  SUBROUTINE 
PARMLEN  -  LENGTH  OF  LONGEST  USER  PARAMETER 
VALULEN  -  LENGTH  OF  LONGEST  USER  VALUE 

SHORT  -  IF  OMITTED,  THE  GENERATED  SUBROUTINE  HANDLES  FOUR 
PARAMETERS  (I-,  L-,  DEBUG,  D-) 

IF  ANY  VALUE  SPECIFIED,  THE  GENERATED  SUBROUTINE 
HANDLES  TWO  PARAMETERS  (I-,  L-) 

DEFAULT  BEGIN  STATEMENT 
PARMGET, G, 5, 7. 

MAX  FL:  20000B 

REMARKS 

THE  GENERATED  SUBROUTINE  HAS  CODE  FOR: 

1)  CALCULATING  THE  LENGTH  OF  BOTH  THE  PARAMETER  AND  VALUE 
STRINGS  (USING  SUBROUTINE  'LASTCH') 

2)  INPUT  FILE  'I-' 

3)  OUTPUT  FILE  '  L- ' 

A)  DEBUG  OPTION  'DEBUG=YES'  (SHORT  OMITTED) 

(ANYTHING  ELSE  IMPLIES  ’DEBUG-NO’) 

5)  DEBUG  FILE  'D-'  (SHORT  OMITTED) 

6)  DAYFILE  MESSAGE  FOR  UNRECOGNIZED  PARAMETERS. 

THE  GENERATED  ROUTINE  IS  EASILY  MODIFIED  TO  ADD  OTHER 
PARAMETERS,  OR  MODIFY  THE  SUPPLIED  ONES. 

THIS  SUBROUTINE,  OR  ONE  LIKE  IT,  SHOULD  BE  USED  TO  EXTRACT 
ALL  THE  USER  EXECUTE  PARAMETERS.  THIS  IS  ESPECIALLY 
IMPORTANT  SINCE  THIS  IS  A  MACHINE-DEPENDENT  FEATURE.  THE 
SUBROUTINE  CAN  BE  REMOVED  OR  REPLACED  BY  ANOTHER  WHEN  MOVING 
THE  PROGRAM  TO  ANOTHER  COMPUTER. 

DON'T  ANALYZE  THE  PARAMETERS  IN  THIS  SUBROUTINE.  INSTEAD, 
USE  A  SEPARATE  SUBPROGRAM,  SINCE  ANALYZING  PARAMETERS  MAY 
BE  THE  SAME  EVEN  ON  ANOTHER  COMPUTER. 

OUTPUT  DESCRIPTION 

A  NEW  FILE  'LFN'  WILL  CONTAIN  THE  GENERATED  SUBROUTINE. 


:  01/28/83 
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AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 
DATE  WRITTEN:  12/15/81 
DATE (S)  REVISED 

08/17/82  -  ADD  TO  PUBLIC-ACCESS  PROCEDURE  FILE 
01/28/83  -  GENERATED  SUBROUTINE  WILL  NOW  RETURN  THE  LENGTHS 
OF  THE  KEYWORD  PARAMETERS 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, , PROCFIL, , PARMGET , OUTPUT, MSACCES=<PASSWORD> . 
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PROCEDURE  ' PFRSTOR 


PURPOSE 

CREATE  A  FILE  OF  DIRECTIVES  TO  RESTORE  PERMANENT  FILES 

FUNCTIONAL  CATEGORIES:  QA 

COMPUTERS  (OPERATING  SYSTEMS) 

CDC  6000/CYBER  170  (NOS/BE) 

LOCATION  OF  PROCEDURE 

PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, PFRSTOR. 

DEFAULT  BEGIN  STATEMENT 
BEGIN, PFRSTOR. 

MAX  FL: 

REMARKS 

THIS  PROCEDURE  EXECUTES  A  PROGRAM  WHICH  WILL  PROMPT  THE 
USER  FOR  INFORMATION  NEEDED  TO  CREATE  A  FILE  OF  DIRECTIVES 
WHICH  WILL  THEN  BE  USED  BY  USER  SERVICES  TO  RESTORE 
PERMANENT  FILES  WHICH  WERE  PURGED  BECAUSE  OF  LACK  OF  USE. 

THE  FILE  CREATED  HAS  PFN=RESTOREFILES  AND  IS  CATALOGED  UNDER 
THE  ID  OF  THE  PERSON  RUNNING  THE  PROCEDURE. 

THE  PROGRAM  THIS  PROCEDURE  EXECUTES  HAS  BUILT-IN  DIRECTIONS. 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  04/ 16/80 

DATE (S)  REVISED 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, .PFRSTOR, OUTPUT, MSACCES=<PASSWORD>. 
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PROCEDURE  1 PGMTAPE 


PURPOSE 

EXTRACT  A  SOURCE  PROGRAM  FROM  TAPE 

FUNCTIONAL  CATEGORIES:  Q6 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, PGMTAPE,, LIB, PGM, OUTFILE.CST. 

DESCRIPTION  OF  PARAMETERS 

LIB  -  LIBRARY  (ONE  OF:  BIMED,  NSRDC  (DEFAULT), 

SSP) 

PGM  -  PROGRAM  DESIRED 

OUTFILE  -  FILE  TO  CONTAIN  SOURCE  PROGRAM 

CST  -  TYPE  OF  FILE  DESIRED 

C  -  COMPILE  FILE  (UPDATE, C-OUTFILE) 

S  -  SOURCE  FILE  (UPDATE, S-OUTFILE) 

T  -  SOURCE  FILE  (UPDATE  T-OUTFILE) 

DEFAULT  BEGIN  STATEMENT 

BEGIN, PGMTAPE, , NSRDC, *, COMPILE, C. 

(*  -  USER  MUST  SUPPLY) 

MAX  FL:  42000B 

REMARKS 

THIS  IS  A  BATCH-ONLY  PROCEDURE.  THE  JOB  CARD  MUST  SPECIFY 
MT1.  THE  PROCEDURE  WILL  SUPPLY  THE  LABEL  CARD. 

• 

ERROR  MESSAGES 

NO  PROGRAM  REQUESTED 

PARAMETER  'PGM'  WAS  OMITTED. 

PGMTAPE  REQUIRES  A  TAPE  AND  MUST  BE  RUN  FROM  BATCH 
USER  TRIED  TO  EXECUTE  PGMTAPE  FROM  INTERCOM. 

UNKNOWN  LIBRARY  (<LIB>) 

INDICATED  LIBRARY  NAME  IS  NOT  SUPPORTED. 

EXAMPLE 

GET  SOURCE  PROGRAM  FOR  PROGRAM  'CMPINV'  IN  LIBRARY  'NSRDC': 

JOBNAME.MT1. 

CHARGE, .... 

BEGIN, PGMTAPE, , .CMPINV , FILE. 

LFN  'FILE'  CONTAINS  A  COMPILE  FILE  COPY  OF  'CMPINV'. 
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AUTHOR 


DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  08/24/77 

DATE (S)  REVISED 

03/01/78  -  CONVERT  TO  CCL 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, , PROCFIL , , PGMTAPE , OUTPUT , MSACCES“<PASSWORD> . 
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PROCEDURE  'PHC* 


PURPOSE 

PURGE  HIGH  CYCLE  WHILE  RETAINING  LOW  CYCLE 

FUNCTIONAL  CATEGORIES:  Q4 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN , PHC , , PFN , ID, PW1 , PW2 , PW3 , PW4 , PW5 , SN , UV . 

DESCRIPTION  OF  PARAMETERS 

PFN  -  PERMANENT  FILE  NAME 

ID  -  ID 

PW1-PW5  -  PASSWORDS 

SN  -  SETNAME  (DEFAULT:  SYSSET) 

UV  -  UNIVERSAL  PASSWORD  (FOR  USER  DEVICE  SETS) 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  15000B 

REMARKS 

NONE 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 
DATE  WRITTEN:  01/27/80 
DATE (S)  REVISED 

02/24/81  -  ADD  SN  AND  UV  PARAMETERS 

12/17/82  -  SPLIT  PF  STATEMENTS  INTO  MULTIPLE  LINES  TO  AVOID 
POSSIBLE  PROBLEMS  AFTER  PARAMETER  SUBSTITUTION 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, , PHC, OUTPUT, MSACCES-<PASSWORD>. 
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PROCEDURE  ' PLC' 


m 


PURPOSE 

PURGE  LOW  CYCLE  WHILE  RETAINING  HIGH  CYCLE 

FUNCTIONAL  CATEGORIES:  Q4 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN , PLC , , PFN , ID, PW1 , PW2 , PW3 , PW4 , PW5 , SN , UV . 

DESCRIPTION  OF  PARAMETERS 

PFN  -  PERMANENT  FILE  NAME 

ID  -  ID 

PW1-PW5  -  PASSWORDS 

SN  -  SETNAME  (DEFAULT:  SYSSET) 

UV  -  UNIVERSAL  PASSWORD  (FOR  USER  DEVICE  SETS) 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  15000B 

REMARKS 

NONE 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 
DATE  WRITTEN:  01/27/80 
DATE (S)  REVISED 

02/24/81  -  ADD  SN  AND  UV  PARAMETERS 

12/17/82  -  SPLIT  PF  STATEMENTS  INTO  MULTIPLE  LINES  TO  AVOID 
POSSIBLE  PROBLEMS  AFTER  PARAMETER  SUBSTITUTION 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN , DOCGET , , PROCFIL , , PLC , OUTPUT , MSACCES-<PASSWORD> . 


* 
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PROCEDURE  'PM' 

PURPOSE 

CREATE  CERTAIN  PRINT  MESSAGE  (PM)  RECORDS 

FUNCTIONAL  CATEGORIES:  J4 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN , PM, , FC , OUTPUT , PMl , PM2 , PM3 , PM4 , PM5 , PM6 . 

DESCRIPTION  OF  PARAMETERS 
FC  -  FORMS  CODE 

OMITTED  -  PM  RESTORE  PRINTER 

IT  -  PM  1-PART  NARROW  UNLINED  PAPER 

' OTHER ’  -  PM  PMl  PM2  PM3  PM4  PM5 ‘PM6  ’ 

(USER  MAY  CREATE  A  MESSAGE  OF  UP  TO 
6  WORDS  (30  CHARACTERS  MAX) 

OUTPUT  -  LISTABLE  OUTPUT 

PM1-PM6  -  UP  TO  6  WORDS. FOR  USER-SPECIFIED  PM  MESSAGE 
(USED  ONLY  WHEN  FC-OTHER) 

DEFAULT  BEGIN  STATEMENT 
BEGIN, PM,, .OUTPUT. 

MAX  FL:  6000B 

REMARKS 

BE  SURE  'BEGIN, PM,,, OUTPUT.'  HAS  BEEN  EXECUTED  TO  RESTORE 
PRINTER  BEFORE  ROUTING  OUTPUT  TO  BE  PRINTED. 

PM  MESSAGES  ARE  IGNORED  AT  CENTRAL  SITE.  USE  FC-  ON  ROUTE 
COMMAND. 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  07/30/76 

DATE (S)  REVISED 

11/19/76  -  ADD  'OTHER'  OPTION 
03/01/78  -  CONVERT  TO  CCL 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, , PM, OUTPUT, MSACCES-<PASSWORD>. 
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PROCEDURE  'PROADD' 


PURPOSE 

ADD  ONE  PROCEDURE  TO  A  SEQUENTIAL  PROCEDURE  FILE 

FUNCTIONAL  CATEGORIES:  Q7 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, PROADD, , ID, NEW, AC , PWl , PW2 , PW3 , PW4 , PW5 . 

DESCRIPTION  OF  PARAMETERS 

ID  -  ID  UNDER  WHICH  PROCEDURE  FILE  IS  CATALOGED 

(PFN  IS-  '  PROCFILS  '  ) 

NEW  -  -  FILE  CONTAINING  NEW  NAMED  PROCEDURE 
(MAY  NOT  BE  FILE  'INPUT') 

AC  -  AC  FOR  CATALOG  (MAY  BE  OMITTED) 

PW1-PW5  -  PASSWORDS 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  36000B 

REMARKS 

PROCEDURE  FILE  IS  A  SEQUENTIAL  FILE  OF  NAMED  PROCEDURES 
ARRANGED  IN  ALPHABETICAL  ORDER.  EACH  PROCEDURE  CONSISTS  OF 
ONE  AND  ONLY  ONE  SYSTEM  LOGICAL  RECORD. 

ALL  EMPTY  RECORDS  ARE  REMOVED. 

THE  LOWEST  CYCLE  IS  PURGED,  IF  POSSIBLE.  AT  LEAST  2 
CYCLES  ARE  ALWAYS  RETAINED. 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 
DATE  WRITTEN:  05/28/76 
DATE (S)  REVISED 

03/01/78  -  CONVERT  TO  CCL;  INCREASE  TO  5  PASSWORDS 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN , DOCGET , , PROCFIL , , PROADD , OUTPUT , MSACCES-<PASSWORD> . 
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PROCEDURE  'PROALL’ 


PURPOSE 

LIST  PROCEDURE  NAMES,  PROCEDURE  HEADERS  AND  THE  PROCEDURES 
IN  A  SEQUENTIAL  PROCEDURE  FILE  (COMBINES  PRONAM,  PROHDR 
AND  PROLIST) 

FUNCTIONAL  CATEGORIES:  01 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN , PROALL , , ID , OUTPUT , LEFT , PW1 , PW2 , PW3 , PW4 , PW5 . 
DESCRIPTION  OF  PARAMETERS 

ID  -  ID  UNDER  WHICH  THE  PROCEDURE  FILE  IS  CATALOGED 

(PFN  IS  1 PROCFILS ' ) 

OUTPUT  -  LISTABLE  OUTPUT 

LEFT  -  OMITTED  -  PRINT  LEFT- JUSTIFIED  ON  PAGE 
NON-BLANK  -  PRINT  CENTERED  ON  WIDE  PAGE 
PW1-PW5  -  PASSWORDS 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  36000B 

REMARKS 

A  BANNER  PAGE  PRECEDES  THE  LIST  AND  CONTAINS  THE  WORD 
'PROCFILS'  AND  THE  SPECIFIED  ID.  A  BANNER  PAGE  WITH  THE 
WORD  'END'  FOLLOWS  THE  LIST. 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 
DATE  WRITTEN:  06/02/76 
DATE (S)  REVISED 

02/10/77  -  ADD  PARAMETER  'LEFT' 

03/01/78  -  CONVERT  TO  CCL;  ADD  5  PASSWORDS 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, .PROALL, OUTPUT, MSACCES-<PASSWORD>. 
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PROCEDURE  'PRODELE 


PURPOSE 

DELETE  ONE  PROCEDURE  FROM  A  SEQUENTIAL  PROCEDURE  FILE 

FUNCTIONAL  CATEGORIES:  Q7 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, PRODELE , , ID , PROCED , AC , PW 1 , P W2 , PW3 , PW A , PW5 . 

DESCRIPTION  OF  PARAMETERS 

ID  -  ID  UNDER  WHICH  PROCEDURE  FILE  IS  CATALOGED 

(PFN  IS  ' PROCFILS ' ) 

PROCED  -  PROCEDURE  TO  BE  DELETED 
AC  -  AC  FOR  CATALOG  (MAY  BE  OMITTED) 

PW1-PW5  -  PASSWORDS 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  36000B 

REMARKS 

PROCEDURE  FILE  IS  A  SEQUENTIAL  FILE  OF  NAMED  PROCEDURES 
ARRANGED  IN  ALPHABETICAL  ORDER.  EACH  PROCEDURE  CONSISTS  OF 
ONE  AND  ONLY  ONE  SYSTEM  LOGICAL  RECORD. 

ALL  EMPTY  RECORDS  ARE  REMOVED. 

THE  LOWEST  CYCLE  IS  PURGED,  IF  POSSIBLE.  AT  LEAST  2 
CYCLES  ARE  ALWAYS  RETAINED. 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 
DATE  WRITTEN:  05/28/76 
DATE(S)  REVISED 

03/01/78  -  CONVERT  TO  CCL;  INCREASE  TO  5  PASSWORDS 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, .PRODELE, OUTPUT, MSACCES=<PASSWORD>. 
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PROCEDURE  'PRODOC' 


PURPOSE 

LIST  DOCUMENTATION  FOR  PROCEDURES  PROADD,  PROALL,  PRODELE, 
PRODOC,  PROGET,  PROHDR ,  PROLIST,  PRONAM,  PROREPL,  PROS2R 

FUNCTIONAL  CATEGORIES:  01 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN , PRODOC , , OUTPUT , LEFT . 

DESCRIPTION  OF  PARAMETERS 
OUTPUT  -  LISTABLE  OUTPUT 

LEFT  -  OMITTED  -  PRINT  LEFT- JUSTIFIED  ON  PAGE 
NON-BLANK  -  PRINT  CENTERED  ON  WIDE  PAGE 

DEFAULT  BEGIN  STATEMENT 
BEGIN , PRODOC , , OUTPUT . 

MAX  FL:  25000B 

REMARKS 

A  BANNER  PAGE  PRECEDES  THE  LIST  AND  CONTAINS  THE  WORD 
'PRODOC'.  A  BANNER  PAGE  WITH  THE  WORD  'END'  FOLLOWS  THE 
LIST. 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 
DATE  WRITTEN:  06/02/76 
DATE (S)  REVISED 

02/10/77  -  ADD  PARAMETER  'LEFT' 

03/01/78  -  CONVERT  TO  CCL;  ADD  PR0S2R  DOCUMENT 
05/17/83  -  USE  PROGRAM  GETDOC  INSTEAD  OF  MANYDOC 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, , PRODOC, OUTPUT, MSACCES-<PASSWORD>. 
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PROCEDURE  'PROGET 


PURPOSE 

GET  (EXTRACT)  ONE  PROCEDURE  FROM  A  SEQUENTIAL  PROCEDURE  FILE 

FUNCTIONAL  CATEGORIES:  Q7 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN , PROGET , , ID , PROCED , LFN , PW1 , PW2 , PW3 , PW4 , PW5 . 

DESCRIPTION  OF  PARAMETERS 

ID  -  ID  UNDER  WHICH  PROCEDURE  FILE  IS  CATALOGED 

(PFN  IS  ' PROCFILS 1 ) 

PROCED  -  NAME  OF  DESIRED  PROCEDURE 

LFN  -  NAME  OF  FILE  TO  CONTAIN  'PROCED' 

PW1-PW5  -  PASSWORDS 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  36000B 

REMARKS 

PROCEDURE  FILE  IS  A  SEQUENTIAL  FILE  OF  NAMED  PROCEDURES 
ARRANGED  IN  ALPHABETICAL  ORDER.  EACH  PROCEDURE  CONSISTS  OF 
ONE  AND  ONLY  ONE  SYSTEM  LOGICAL  RECORD. 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  05/28/76 

DATE (S)  REVISED 

02/04/77  -  ADD  PW1  AND  PW2 

03/01/78  -  CONVERT  TO  CCL;  INCREASE  TO  5  PASSWORDS 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, ,PROCF I L, .PROGET, OUTPUT, MSACCES=<PASSWORD>. 
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PROCEDURE  'PROGRAM 


PURPOSE 

EXECUTE  A  CATALOGED  PROGRAM  (NOT  IN  A  LIBRARY) 

FUNCTIONAL  CATEGORIES:  LO  Q3 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN , PROGRAM, , PFN , ID, PARAMS . 

DESCRIPTION  OF  PARAMETERS 

PFN  -  PERMANENT  FILE  NAME  OF  THE  PROGRAM 

ID  -  ID  UNDER  WHICH  IT  IS  CATALOGED 

(DEFAULT:  SYSTEM  PUBLIC-ACCESS  ID) 

PARAMS  -  UP  TO  18  PARAMETERS  FOR  THE  PROGRAM 

(KEYWORD  PARAMETERS  MUST  BE  $-DELIMITED,  E.G., 
SOPT-LS.) 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  DEPENDS  UPON  PROGRAM  BEING  EXECUTED 

REMARKS 

<PFN>  IS  ATTACHED  WITH  LFN  ' YYYPROG '  AND  IS  RETURNED  AT  THE 
END  OF  THE  PROCEDURE. 

SEE  ALSO  PROCEDURE  'ANYLIB' . 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  09/1 A/76 

DATE (S)  REVISED 

03/01/78  -  CONVERT  TO  CCL 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, .PROGRAM, OUTPUT, MSACCES-<PASSWORD>. 


0A/30/84 


2-113 


PROGRAM  -  1  OF  1 


PROCEDURE  ' PROHDR ' 


PURPOSE 

LIST  PROCEDURE  HEADERS  IN  A  PROCEDURE  FILE 

FUNCTIONAL  CATEGORIES:  Q7 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN , PROHDR , , ID, OUTPUT , PW1 , PW2 , PW3 , PW4 , PW5 . 

DESCRIPTION  OF  PARAMETERS 

ID  -  ID  UNDER  WHICH  PROCEDURE  FILE  IS  CATALOGED 

(PFN  IS  ' PROCFILS 1 ) 

OUTPUT  -  LISTABLE  OUTPUT 
PW1-PW5  -  PASSWORDS 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  36000B 

REMARKS 

PROCEDURE  FILE  IS  A  SEQUENTIAL  FILE  OF  NAMED  PROCEDURES 
ARRANGED  IN  ALPHABETICAL  ORDER.  EACH  PROCEDURE  CONSISTS  OF 
ONE  AND  ONLY  ONE  SYSTEM  LOGICAL  RECORD. 

ALL  EMPTY  RECORDS  ARE  FLAGGED  IN  THE  LIST. 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 
DATE  WRITTEN:  05/28/76 
DATE (S)  REVISED 

03/01/78  -  CONVERT  TO  CCL;  ADD  5  PASSWORDS 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, , PROCFI L , , PROHDR , OUTPUT , MSACCES=<PASSWORD> . 
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PROCEDURE  ' PROLIST ' 


PURPOSE 

LIST  PROCEDURE (S)  IN  A  SEQUENTIAL  PROCEDURE  FILE 

FUNCTIONAL  CATEGORIES:  01 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN , PROLIST , , ID, OUTPUT , PROCED, PW1 , PW2 , PW3 , PWA , PW5 . 
DESCRIPTION  OF  PARAMETERS 

ID  -  ID  UNDER  WHICH  PROCEDURE  FILE  IS  CATALOGED 

(PFN  IS  ' PROCFILS ' ) 

OUTPUT  -  LISTABLE  OUTPUT 

PROCED  -  NAME  OF  PROCEDURE  TO  BE  LISTED 

(IF  OMITTED  OR  'ALL',  ALL  PROCEDURES  ARE  LISTED) 
PW1-PW5  -  PASSWORDS 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  36000B 

REMARKS 

PROCEDURE  FILE  IS  A  SEQUENTIAL  FILE  OF  NAMED  PROCEDURES 
ARRANGED  IN  ALPHABETICAL  ORDER.  EACH  PROCEDURE  CONSISTS  OF 
ONE  AND  ONLY  ONE  SYSTEM  LOGICAL  RECORD. 

ALL  EMPTY  RECORDS  ARE  FLAGGED  IN  THE  LIST. 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 
DATE  WRITTEN:  05/28/76 
DATE (S)  REVISED 

03/01/78  -  CONVERT  TO  CCL;  ADD  5  PASSWORDS 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, ,PROCFIL, , PROLIST, OUTPUT, MSACCES-<PASSWORD>. 
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PROCEDURE  'PRONAM' 


PURPOSE 

LIST  NAMES  OF  PROCEDURES  IN  A  SEQUENTIAL  PROCEDURE  FILE 

FUNCTIONAL  CATEGORIES:  Q7 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN , PRONAM , , ID , OUTPUT , FULL , PW1 , PW2 , PW3 , PW4 , PW5 . 
DESCRIPTION  OF  PARAMETERS 

ID  -  ID  UNDER  WHICH  PROCEDURE  FILE  IS  CATALOGED 

(PFN  IS  1 PROCFILS 1 ) 

OUTPUT  -  LISTABLE  OUTPUT 

FULL  -  IF  OMITTED,  A  FULL  LIST  WITH  HEADINGS  IS  PRINTED. 

IF  ANYTHING  IS  SPECIFIED,  A  QUICK,  SINGLE-COLUMN 
LIST,  WITHOUT  HEADINGS,  IS  PROVIDED.  THIS  MAY  BE 
MORE  USEFUL  AT  AN  INTERACTIVE  TERMINAL. 

PW1-PW5  -  PASSWORDS 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  36000B 

REMARKS 

PROCEDURE  FILE  IS  A  SEQUENTIAL  FILE  OF  NAMED  PROCEDURES 
ARRANGED  IN  ALPHABETICAL  ORDER.  EACH  PROCEDURE  CONSISTS  OF 
ONE  AND  ONLY  ONE  SYSTEM  LOGICAL  RECORD. 

ALL  EMPTY  RECORDS  ARE  FLAGGED  IN  THE  LIST. 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 
DATE  WRITTEN:  05/28/76 
DATE (S)  REVISED 

03/01/78  -  CONVERT  TO  CCL;  ADD  5  PASSWORDS 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN , DOCGET , , PROCFIL , , PRONAM , OUTPUT , MSACCES-<PASSWORD> . 
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PROCEDURE  ' PROREPL 


PURPOSE 

REPLACE  ONE  PROCEDURE  IN  A  SEQUENTIAL  PROCEDURE  FILE 

FUNCTIONAL  CATEGORIES:  Q7 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN , PROREPL , , ID , NEW , AC , PW 1 , PW2 , PW3 , PW4 , PW5 . 

DESCRIPTION  OF  PARAMETERS 

ID  -  ID  UNDER  WHICH  PROCEDURE  FILE  IS  CATALOGED 

(PFN  IS  ' PROCFILS 1 ) 

NEW  -  FILE  CONTAINING  NEW  NAMED  PROCEDURE 
(MAY  NOT  BE  FILE  ’INPUT') 

AC  -  AC  FOR  CATALOG  (MAY  BE  OMITTED) 

PW1-PW5  -  PASSWORDS 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  36000B 

REMARKS 

PROCEDURE  FILE  IS  A  SEQUENTIAL  FILE  OF  NAMED  PROCEDURES 
ARRANGED  IN  ALPHABETICAL  ORDER.  EACH  PROCEDURE  CONSISTS  OF 
ONE  AND  ONLY  ONE  SYSTEM  LOGICAL  RECORD. 

ALL  EMPTY  RECORDS  ARE  REMOVED. 

THE  LOWEST  CYCLE  IS  PURGED,  IF  POSSIBLE.  AT  LEAST  2 
CYCLES  ARE  ALWAYS  RETAINED. 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 
DATE  WRITTEN:  05/28/76 
DATE(S)  REVISED 

03/01/78  -  CONVERT  TO  CCL;  INCREASE  TO  5  PASSWORDS 
12/17/82  -  SPLIT  PF  STATEMENTS  INTO  MULTIPLE  LINES  TO  AVOID 
POSSIBLE  PROBLEMS  AFTER  PARAMETER  SUBSTITUTION 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, .PROREPL, OUTPUT, MSACCES«<PASSWORD>. 
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PROCEDURE  ' PROS2R 


PURPOSE 

CONVERT  SEQUENTIAL  PROCEDURE  FILE  TO  RANDOM  EDITLIB  USER 
LIBRARY 

FUNCTIONAL  CATEGORIES:  K3  Q7 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN , PROS2R , , IDS , IDR , AC , PWl , PW2 , PW3 , PW4 , PW5 . 

DESCRIPTION  OF  PARAMETERS 

IDS  -  ID  UNDER  WHICH  SEQUENTIAL  FILE  'PROCFILS'  IS 
CATALOGED 

IDR  -  ID  UNDER  WHICH  RANDOM  FILE  'PROCFIL'  IS  TO  BE 
CATALOGED 

AC  -  JOB  ORDER  NUMBER  FOR  CATALOG 

(MAY  BE  OMITTED) 

PW1-PW5  -  PASSWORDS  FOR  RANDOM  FILE 

(WILL  HAVE  EFFECT  ONLY  IF  AT  LEAST  ONE  CYCLE  OF 
RANDOM  FILE  'PROCFIL'  EXISTS  BEFORE  PROS2R  IS 
EXECUTED) 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL: 

REMARKS 

PFN  OF  SEQUENTIAL  FILE  MUST  BE  'PROCFILS'. 

PFN  OF  RANDOM  FILE  WILL  BE  'PROCFIL'. 

LOWEST  CYCLE  OF  'PROCFIL'  WILL  BE  PURGED,  IF  POSSIBLE. 

AT  LEAST  2  CYCLES  WILL  ALWAYS  BE  RETAINED. 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 
DATE  WRITTEN:  03/27/78 
DATE (S)  REVISED 

12/17/82  -  SPLIT  PF  STATEMENTS  INTO  MULTIPLE  LINES  TO  AVOID 
POSSIBLE  PROBLEMS  AFTER  PARAMETER  SUBSTITUTION 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, ,PROS2R, OUTPUT, MSACCES-<PASSWORD> . 
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PROCEDURE  'PURGALL' 


PURPOSE 

PURGE  PERMANENT  FILES  OF  SPECIFIED  AC  AND  ID  (PUBLIC  FILES 
OR  ON  A  USER  DEVICE  SET) 

FUNCTIONAL  CATEGORIES:  Q4 

COMPUTERS  (OPERATING  SYSTEMS) 

CDC  6000/CYBER  170  (NOS/BE) 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN , PURGALL , , JOBORDER , ID , OUTPUT , PWl , PW2, PW3 , PW4 , PW5 , SN . 

DESCRIPTION  OF  PARAMETERS 

JOBORDER  -  JOB  ORDER  NUMBER  (MUST  BE  SPECIFIED) 

ID  -  ID  OF  FILES  TO  BE  PURGED  (MUST  BE  SPECIFIED) 

OUTPUT  -  LISTABLE  OUTPUT 

PW1-PW5  -  UP  TO  5  PASSWORDS  FOR  ALL  FILES  TO  BE  PURGED 
(ONLY  TK,  RD  AND  CN  PASSWORDS  ARE  REQUIRED) 

SN  -  SETNAME.  ONE  OF: 

OMITTED  -  PUBLIC  PERMANENT  FILES 
OTHER  -  SETNAME  OF  A  USER  DEVICE  SET 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  35000B 

REMARKS 

1)  PROCEDURE  WILL  AUDIT  SPECIFIED  ID  AND  JOBORDER.  ALL 
THESE  FILES  WILL  BE  PURGED. 

2)  INVALID  TK,  RD,  CN  PASSWORDS  WILL  ABORT  THE  PROCEDURE. 

3)  CHARGE  ID  OR  ACCESS  NUMBER  MUST  CORRESPOND  TO  ID  AND 
AC  BEING  PURGED. 

4)  THE  USER  MUST  SUPPLY  THE  MOUNT  CARD  WHEN  PURGING  ON  A 
USER  DEVICE  SET. 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 
SHARON  GOOD  -  DTNSRDC  CODE  1892.1 

DATE  WRITTEN:  03/15/79 

DATE (S)  REVISED 

06/16/80  -  ADD  SN  PARAMETER 
06/01/82  -  UPGRADE  FOR  LEVEL  508 

-  UPGRADE  FOR  PERMANENT  FILE  MULTI-DIRECTORIES 
09/14/82  -  IMPROVE  SN  PROCESSING 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, .PURGALL, OUTPUT, MSACCES-<PASSWORD>. 
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PROCEDURE  'PURGEN' 


PURPOSE 

GENERATE  PROCEDURE  'PUR'  TO  PURGE  SEVERAL  FILES  WITH  COMMON 
KERNEL 

FUNCTIONAL  CATEGORIES:  Q4 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN , PURGEN , , KERNEL , ID, PW1 , PW2 , PW3, PW4 , PW5 , UV , SN . 

DESCRIPTION  OF  PARAMETERS 

KERNEL  -  FIRST  N  CHARACTERS  OF  PERM  FILT  AME 
(COULD  BE  EMPTY) 

ID  -  ID  OF  FILES  TO  BE  PURGED 

PW1-PW5  -  UP  TO  5  PASSWORDS  FOR  ALL  FILES  TO  BE  PURGED 

(ONLY  TK  AND  CN  PASSWORDS  ARE  REQUIRED) 

UV  -  UNIVERSAL  PURGE  PASSWORD  IF  REQUIRED 

SN  -  SETNAME  (ONLY  IF  OTHER  THAN  SYSSET) 

DEFAULT  BEGIN  STATEMENT 
NO  MEANINGFUL  DEFAULT 

MAX  FL:  35000B 

REMARKS 

1)  GENERATES  PROCEDURE  PUR  TO  BE  USED  FOR  PURGING  SEVERAL 
FILES  OF  SAME  ID  AND  PASSWORDS.  ALLOWS  COMMON  KERNEL  FOR 
START  OF  PERM  FILE  NAMES.  WILL  ATTEMPT  TO  EXECUTE  'PUR' 
ONCE  TO  PURGE  THE  KERNEL  FILE  NAME,  LOWEST  CYCLE. 

2)  USAGE  TO  PURGE  ADDITIONAL  FILES: 

PUR, <PART>. . 


EXAMPLE 

DESIRE  TO  PURGE  A  SET  OF  FILES  INCLUDING:  CARRIERDATAl , 

CARR I ERDATA2 ,  CARRIERPL,  CARRIEROBJ,  CARRIERSOR,  BELONGING 
TO  USER  'CZZZ'  WITH  PASSWORD  'FIR'  OR  'SEC'  OR  NO  PASSWORD. 

1)  BEGIN, PURGEN, .CARRIER, CZZZ, FIR, SEC. 

WILL  ATTEMPT  TO  PURGE  THE  KERNEL  FILE  NAMED  CARRIER. 

2)  PUR, DATA 1. 

PUR, DAT A2. 

PUR, PL. 

PUR, OBJ. 

PUR.SOR.  TO  PURGE  THE  ACTUAL  FILES 
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AUTHOR 

SHARON  E  GOOD  -  DTNSRDC  CODE  1892.1 
DATE  WRITTEN:  09/12/80 
DATE (S)  REVISED 

02/10/81  -  ADD  UV,  SN  PARAMETERS 

09/14/82  -  UPGRADE  FOR  PERMANENT  FILE  MULTI-DIRECTORIES 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, , PUR GEN, OUTPUT, MSACCES-<PASSWORD>. 


04/30/84 


2-121 


PURGEN 


2  OF 


PROCEDURE  'PURPOSE' 


PURPOSE 

DRIVER  TO  EXTRACT  PURPOSES  FROM  A  DOCUMENT  FILE 

FUNCTIONAL  CATEGORIES:  SO  01 

COMPUTERS  (OPERATING  SYSTEMS) 

CDC  6000/CYBER  170  (NOS/BE) 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

EXECUTE  STATEMENT 

PURPOSE , OUTPUT , LIB , ID, UN , LO . 

DESCRIPTION  OF  PARAMETERS 
OUTPUT  -  LISTABLE  OUTPUT 
LIB  -  NAME  OF  LIBRARY  TO  BE  EXTRACTED 
(E.G.,  UTILITY,  NSRDC5) 

(IF  PF,  FULL  PFN  IS  <LIB>_DOCUMENTATION ; 

IF  ON  MSS,  MFN“<LIB>) 

ID  -  ID  UNDER  WHICH  LIB  IS  CATALOGED 
(DEFAULT:  PUBLIC-ACCESS  ID) 

UN  -  UN  UNDER  WHICH  MSS  FILE  IS  STORED 
(DEFAULT:  UN-DOCU) 

LO  -  LIST  OPTION 

L  -  LEFT- JUSTIFIED  ON  PAPER 
OTHER  -  CENTERED  ON  WIDE  PAPER 
(DEFAULT:  LO-L) 

DEFAULT  EXECUTE  STATEMENT 
PURPOSE , OUTPUT , , DOCU , L . 

MAX  FL:  27000B 

REMARKS 

NONE 

ERROR  MESSAGES  (FROM  PROGRAM  PURPOS) 

NO  DECKS  FOUND 

FILE  CONTAINED  NO  ^DECK'S. 

NO  PURPOSES  FOUND 

FILE  HAS  NO  PURPOSES.  IT  IS  PROBABLY  NOT  A  DOCUMENT 
FILE. 
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EXAMPLES 

1)  GET  PURPOSES  FOR  PUBLIC-ACCESS  PROCEDURE  FILE: 

BEGIN, PURPOSE, ,OUT,PROCFIL. 

ROUTE, OUT, DC-PR, _ 

2)  GET  PURPOSES  FOR  MY  PROGRAM  LIBRARY  MYLIB: 

BEGIN, PURPOSE, , OUT, MYLIB.MYID. 

ROUTE, OUT, DC-PR, _ 

3)  GET  PURPOSES,  CENTERED,  FOR  MY  SUBPROGRAM  LIBRARY  ON  MSS 
(MFN-SUBLIBD) : 

BEGIN, PURPOSE, ,OUT, SUBLIBD, ,MYID,C. 

ROUTE, OUT, DC- PR . 


AUTHOR 

DAVID  V.  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  12/20/83 

DATE (S)  REVISED 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, , PROCFIL, , PURPOSE , OUTPUT , MSACCES-<PASSWORD> . 
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PROCEDURE  ' PUTMS ' 


PURPOSE 

TRANSFER  ONE  CDC  PERMANENT  FILE  (OF  EXECUTING  USER)  TO  THE 
MASS  STORAGE  SYSTEM 

FUNCTIONAL  CATEGORIES:  K1  00 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE  FOR  MSS 

COMPUTERS  (OPERATING  SYSTEMS) 

CDC  6000/CYBER  170  (NOS/BE) 

USAGE 

BEGIN , PUTMS , MSS , PFN , ID , MFN , NA, CT , M , PW , AC , PW1 , PW2 . 

DESCRIPTION  OF  PARAMETERS 

PFN  -  CDC  PERMANENT  FILE  NAME 

ID  -  ID  FOR  ATTACH  ON  CDC 

MFN  -  MASS  STORAGE  SYSTEM  FILE  NAME 

NA  -  OVERWRITE  FOR  MSSTORE 

CT  -  CATEGORY  TYPE  FOR  MSSTORE 

M  -  PERMISSION  FOR  MSSTORE 

PW  -  PERMISSION  FOR  MSSTORE 

AC  -  AC  FOR  MSSTORE 

PW1-PW2  -  PASSWORDS  FOR  CDC  ATTACH 

(ONLY  TK,  RD  PASSWORDS  REQUIRED) 

DEFAULT  BEGIN  STATEMENT 

BEGIN, PUTMS, MSS, *,* ,* ,0,P ,R, 0,PW1 , PW2. 

MAX  FL:  20000B 

REMARKS 

THE  CDC  FILE  WILL  NOT  BE  PURGED. 

SEE  ALSO  PROCEDURES  ’ C2M ' ,  ' C2MALL ' ;  ’ GETMS ' ,  ' M2C ' , 

' M2CALL ' . 

ERROR  MESSAGES 

PUTMS  REQUIRES  PFN  PARAMETER 
SELF-EXPLANATORY 

PUTMS  REQUIRES  ID  PARAMETER  FOR  ATTACH 
SELF-EXPLANATORY 

PUTMS  REQUIRES  MFN  PARAMETER 
SELF-EXPLANATORY 
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AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 
DATE  WRITTEN:  01/13/82 
DATE (S)  REVISED 

12/17/82  -  SPLIT  PF  STATEMENTS  INTO  MULTIPLE  LINES  TO  AVOID 
POSSIBLE  PROBLEMS  AFTER  PARAMETER  SUBSTITUTION 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, ,PUTMS, OUTPUT, MSACCES“<PASSWORD>. 


04/30/84 


2-125 


PUTMS 


1  OF  2 


I 


PROCEDURE  ' RECADD1 ' 

PURPOSE 

ADD  ONE  OR  MORE  LOGICAL  RECORDS  TO  A  FILE 

FUNCTIONAL  CATEGORIES:  K1 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN , RECADD1 , , AFTER , NREC , NEW , PFN , ID, AC , PWl , PW2 , PW3 , PW4 , PW5 . 
DESCRIPTION  OF  PARAMETERS 

AFTER  -  RECORD  NUMBER  AFTER  WHICH  THE  NEW  RECORD(S)  ARE  TO 
BE  ADDED 

NREC  -  NUMBER  OF  NEW  LOGICAL  RECORDS  TO  BE  ADDED 
(DEFAULT:  1) 

NEW  -  LFN  OF  FILE  CONTAINING  NEW  RECORD (S) 

PFN  -  PERMANENT  FILE  NAME 

ID  -  ID  UNDER  WHICH  FILE  IS  CATALOGED 

AC  -  JOB  ORDER  NUMBER  FOR  NEW  CATALOG 

(MAY  BE  OMITTED) 

PW1-PW5  -  PASSWORDS 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  20000B 

REMARKS 

REPLACES  PROCEDURE  RECADD. 

THE  LOWEST  CYCLE  OF  FILE  IS  PURGED,  IF  POSSIBLE.  AT  LEAST  2 
CYCLES  ARE  ALWAYS  RETAINED. 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 
DATE  WRITTEN:  04/28/78 
DATE (S)  REVISED 

12/17/82  -  SPLIT  PF  STATEMENTS  INTO  MULTIPLE  LINES  TO  AVOID 
POSSIBLE  PROBLEMS  AFTER  PARAMETER  SUBSTITUTION 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, ,PROCFIL, , RECADD1 , OUTPUT , MSACCES“<PASSWORD> . 
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PROCEDURE  'RECDEL1 


PURPOSE 

DELETE  ONE  OR  MORE  LOGICAL  RECORDS  FROM  A  FILE 

FUNCTIONAL  CATEGORIES:  K1 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN , RECDEL1 , , REC , NREC , PFN , ID , AC , PW1 , PW2 , PW3 , PW4 , PW5 . 
DESCRIPTION  OF  PARAMETERS 

REC  -  RECORD  NUMBER  OF  FIRST/ONLY  LOCIGAL  RECORD  TO  BE 
DELETED 

NREC  -  NUMBER  OF  LOGICAL  RECORDS  TO  BE  DELETED 
(DEFAULT:  1) 

PFN  -  PERMANENT  FILE  NAME 

ID  -  ID  UNDER  WHICH  FILE  IS  CATALOGED 

AC  -  JOB  ORDER  NUMBER  FOR  NEW  CATALOG 

(MAY  BE  OMITTED) 

PW1-PW5  -  PASSWORDS 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  20000B 

REMARKS 

REPLACES  PROCEDURE  RECDELE. 

THE  LOWEST  CYCLE  OF  FILE  IS  PURGED,  IF  POSSIBLE.  AT  LEAST  2 
CYCLES  ARE  ALWAYS  RETAINED. 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 
DATE  WRITTEN:  04/28/78 
DATE (S)  REVISED 

12/17/82  -  SPLIT  PF  STATEMENTS  INTO  MULTIPLE  LINES  TO  AVOID 
POSSIBLE  PROBLEMS  AFTER  PARAMETER  SUBSTITUTION 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, , RECDEL1 , OUTPUT , MSACCES"<PASSWORD> . 
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PROCEDURE  'RECGET1 ' 

PURPOSE 

EXTRACT  ONE  OR  MORE  LOGICAL  RECORDS  FROM  A  FILE 

FUNCTIONAL  CATEGORIES:  K1 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, RECGET1 , , REC , NR EC , PFN , ID, PW1 , PW2 , PW3 , PW4 , PW5 . 
DESCRIPTION  OF  PARAMETERS 

REC  -  RECORD  NUMBER  OF  FIRST/ONLY  LOCIGAL  RECORD  TO  BE 
EXTRACTED 

NREC  -  NUMBER  OF  LOGICAL  RECORDS  TO  BE  EXTRACTED 
(DEFAULT:  1) 

PFN  -  PERMANENT  FILE  NAME 

ID  -  ID  UNDER  WHICH  FILE  IS  CATALOGED 

PW1-PW5  -  PASSWORDS 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  20000B 

REMARKS 

REPLACES  PROCEDURE  RECGET . 

THE  EXTRACTED  RECORD (S)  WILL  BE  ON  A  FILE  WITH  LFN  OF  R 

FOLLOWED  BY  THE  VALUE  OF  REC  (E.G. ,  BEGIN, RECGET, ,8, _ 

WILL  CREATE  FILE  R8.  THIS  FILE  MAY  BE  CATALOGED.  IT  IS  NOT 
REWOUND  AT  THE  END  OF  THE  PROCEDURE. 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 
DATE  WRITTEN:  04/28/78 
DATE (S)  REVISED 

12/17/82  -  SPLIT  PF  STATEMENTS  INTO  MULTIPLE  LINES  TO  AVOID 
POSSIBLE  PROBLEMS  AFTER  PARAMETER  SUBSTITUTION 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN , DOCGET , , PROCFIL , , RECGET 1 , OUTPUT , MSACCES-<PASSWORD> . 
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PROCEDURE  1 RECREP 1 


PURPOSE 

REPLACE  ONE  OR  MORE  LOGICAL  RECORDS  IN  A  FILE 

FUNCTIONAL  CATEGORIES:  K1 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN , RECREP 1 , , REC , NR EC , NEW , PFN, ID, AC, PW1 , PW2 , PW3, PW4, PW5 . 
DESCRIPTION  OF  PARAMETERS 

REC  -  RECORD  NUMBER  OF  FIRST/ONLY  LOCIGAL  RECORD  TO  BE 
REPLACED 

NREC  -  NUMBER  OF  LOGICAL  RECORDS  TO  BE  REPLACED 

(DEFAULT:  1)  ' 

NEW  -  LFN  OF  FILE  CONTAINING  NEW  RECORD(S) 

PFN  -  PERMANENT  FILE  NAME 

ID  -  ID  UNDER  WHICH  FILE  IS  CATALOGED 

AC  -  JOB  ORDER  NUMBER  FOR  NEW.  CATALOG 

(MAY  BE  OMITTED) 

PW1-PW5  -  PASSWORDS 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  20000B 

REMARKS 

REPLACES  PROCEDURE  RECREPL. 

THE  LOWEST  CYCLE  OF  FILE  IS  PURGED,  IF  POSSIBLE,  AT  LEAST  2 
CYCLES  ARE  ALWAYS  RETAINED. 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 
DATE  WRITTEN:  04/28/78 
DATE (S)  REVISED 

12/17/82  -  SPLIT  PF  STATEMENTS  INTO  MULTIPLE  LINES  TO  AVOID 
POSSIBLE  PROBLEMS  AFTER  PARAMETER  SUBSTITUTION 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN , DOCGET , , PROCFIL , , RECREP 1 , OUTPUT , MSACCES=<PASSWORD> . 
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PROCEDURE  'RENAMAC' 


PURPOSE 

RENAME  AC  FIELD  ON  PERMANENT  FILES  OR  MASS  STORE  FILES 

FUNCTIONAL  CATEGORIES:  Q4 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

SYSTEM  PUBLIC-ACCESS  INTERACTIVE  PROCEDURE  FILE 

USAGE  (FOR  PERMANENT  FILES) 

BEGIN , RENAMAC , , OLD , NEW , ID , L , P W1 , PW2 , PW3 , PW4 , PW5 , SN . 

BEGIN, RENAMAC, I, <PARAMS>  <~  FOR  INTERACTIVE  VERSION 

BEGIN, RENAMAC, I,?  <—  FOR  INTERACTIVE  PROCESSING 

DESCRIPTION  OF  PARAMETERS  (FOR  PERMANENT  FILES) 

OLD  -  OLD  AC  (REQUIRED) 

NEW  -  NEW  AC  (REQUIRED) 

ID  -  ID  OF  FILES  TO  BE  RENAMED  (REQUIRED) 

L  -  LISTABLE  OUTPUT  (DEFAULT:  L-OUTPUT) 

PW1-PW5  -  UP  TO  5  PASSWORDS  FOR  ALL  FILES  TO  BE  RENAMED 
(ONLY  TK,  RD  AND  CN  PASSWORDS  ARE  REQUIRED) 

SN  -  SETNAME  (DEFAULT:  DETERMINED  BY  ID) 

USAGE  (FOR  MASS  STORE  FILES) 

BEGIN, RENAMAC, , OLD, NEW, MSS, ,PW1. 

BEGIN, RENAMAC?  <—  FOR  INTERACTIVE  PROCESSING 

DESCRIPTION  OF  PARAMETERS  (FOR  MASS  STORE  FILES) 

OLD  -  OLD  AC  (OPTIONAL) 

(IF  OMITTED,  ALL  FILES  ARE  RENAMED) 

NEW  -  NEW  AC  (REQUIRED) 

MSS  -  REQUIRED  TO  INDICATE  THAT  MASS  STORE  FILES  ARE  TO 
BE  RENAMED 

PW1  -  MSACCES  PASSWORD,  IF  NOT  ALREADY  SPECIFIED  IN  THE 
CURRENT  JOB  OR  SESSION 

DEFAULT  BEGIN  STATEMENT 

PERMANENT  FILE  RENAME,  BUT  NO  MEANINGFUL  DEFAULT  VALUES 
MAX  FL:  35000B 
REMARKS 

PERMANENT  FILE  RENAME 

1)  PROCEDURE  WILL  AUDIT  SPECIFIED  ID  AND  OLD  AC.  ALL 
THESE  FILES  WILL  BE  RENAMED. 

2)  MOST  PF  ATTACH  AND  RENAME  ERRORS  WILL  NOT  BE  FATAL. 
INVALID  TK,  RD  PASSWORDS  WILL  ABORT  THE  PROCEDURE. 

3)  UTILITY  PROGRAM  ' PFNEWAC '  DOES  THE  ACTUAL  ATTACH  AND 
RENAME. 
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MASS  STORE  FILE  RENAME 

1)  PROCEDURE  WILL  DO  A  FULL  MSAUDIT  OF  YOUR  FILES.  IF 
OLD  AC  IS  SPECIFIED,  ONLY  FILES  WITH  THIS  AC  ARE 
RENAMED.  IF  OLD  AC  IS  OMITTED,  ALL  FILES  ARE 
RENAMED. 

2)  THERE  IS  NO  LISTABLE  OUTPUT.  ALL  MESSAGES  ARE  PUT 
INTO  THE  DAYFILE. 

3)  UTILITY  PROGRAM  1 MSNEWAC '  READS  THE  MSAUDIT  AND 
CREATES  A  PROCEDURE  TO  MSCHANG  THE  FILES.  THIS 
PROCEDURE  IS  EXECUTED  AUTOMATICALLY. 

DAYFILE  MESSAGES 
MSS  RENAME  AC 


IDENTIFIES  THAT  MASS  STORE  FILES  ARE  BEING  RENAMED. 

NO  FILES  RENAMED. 

THERE  WERE  NO  FILES  IN  THE  MSAUDIT  OR  NONE  MATCHED  THE 
OLD  AC. 

OLD  AND  NEW  JOB  ORDER  NUMBERS  ARE 

THE  SAME  -  NO  RENAME  NECESSARY 

SELF-EXPLANATORY.  SORRY,  YOU  CAN'T  USE  THIS  PROCEDURE 
TO  ATTACH  ALL  YOUR  FILES! 

PF  RENAME  AC 


IDENTIFIES  THAT  PERMANENT  FILES  ARE  BEING  RENAMED. 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 
DATE  WRITTEN:  06/01/75 
DATE (S)  REVISED 

04/18/77  -  MODIFY  FOR  NOS/BE  SHORT  AUDIT 
09/30/77  -  ADD  TYPE  PARAMETER 
03/01/78  -  CONVERT  TO  CCL 

10/01/78  -  NEW  AUDIT  FORMAT;  DEACTIVATE  ID  PARAMETER 
11/02/78  -  REACTIVATE  ID  PARAMETER 
?  -  REMOVE  TYPE  PARAMETER 

08/28/80  -  TERMINATE  PROCEDURE  IF  OLD  AND  NEW  ARE  THE  SAME 
02/24/81  -  ADD  SN  PARAMETER 

04/12/82  -  MODIFY  SN  PARAMETER  FOR  MULTI-DIRECTORY 

09/14/82  -  ADD  SUPPORT  FOR  MSS  FILES 

09/16/82  -  CHANGE  PARAMETER  ’OUTPUT’  TO  ’ L-OUTPUT’ 

-  CHANGE  CALL  TO  PROGRAM  PFNEWAC  TO  FTN5  VERSION 
11/05/82  -  FIX  MSACCESS  PROCESSING 

02/14/83  -  BECAUSE  EXECUTE  CARDS  CANNOT  BE  CONTINUED, 

SUPPORT  PROGRAM  PFNEWAC  WAS  MODIFIED  TO  ACCEPT 
PASSWORDS  FROM  A  DATA  FILE  (WHICH  IS  BUILT  INTO 
THE  PROCEDURE).  NO  CHANGE  TO  EXECUTION  OF  THIS 
PROCEDURE. 

04/25/84  -  MAKE  INTERACTIVE 

08/30/84  -  PUT  INTERACTIVE  VERSION  INTO  INTEACTIVE  FILE 

-  PUT  NON-INTERACTIVE  VERSION  INTO  REGULAR  FILE 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, ,PROCFIL, , RENAMAC , OUTPUT , MSACCES“<PASSWORD> . 
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PROCEDURE  'RENAMID' 


PURPOSE 

RENAME  ID  ON  ALL  OF  ONE  USER'S  PERMANENT  FILES  (BY  COPYING 
THE  FILES) 

FUNCTIONAL  CATEGORIES:  Q4 

COMPUTERS  (OPERATING  SYSTEMS) 

CDC  6000/CYBER  170  (NOS/BE) 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

SYSTEM  PUBLIC-ACCESS  INTERACTIVE  PROCEDURE  FILE 

USAGE 

BEGIN , RENAMID , , OLDID , NEWID , PW 1 , PW2 , PW3 , PW4 , PW5 , XR , AC . 

BEGIN, RENAMID, I, <PARAMS>  <—  FOR  INTERACTIVE  VERSION 

BEGIN, RENAMID, I,?  <—  FOR  INTERACTIVE  PROCESSING 

DESCRIPTION  OF  PARAMETERS 

OLDID  -  OLD  ID  TO  BE  RENAMED 
NEWID  -  NEW  ID  FOR  RENAMING 
PW1-PW5  -  PASSWORDS  FOR  ATTACHING  EACH  FILE 
(ONLY  CN,  RD  AND  TK  REQUIRED) 

XR  -  OPTIONAL  XR  PASSWORD  TO  BE  PUT  ONTO  ALL  FILES 

AC  -  OPTIONAL  AC  TO  BE  USED  FOR  ALL  FILES 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  30000B 

REMARKS 

SINCE  THE  PUBLIC  PERMANENT  FILE  SYSTEM  WAS  SPLIT  ONTO  TWO 
SETNAMES,  IT  IS  NOT  POSSIBLE  TO  RENAME  FILES  USING  A  SIMPLE 
RENAME  STATEMENT.  INSTEAD,  EACH  FILE  MUST  BE  COPIED  AND 
CATALOGED,  AND  THE  ORIGINAL  FILE  PURGED. 

THIS  PROCEDURE  WILL  DO  A  SHORT  AUDIT  (AI-S)  AND  USE  THAT  AS 
INPUT  TO  PROGRAM  RENMID,  WHICH  WILL  CREATE  A  PROCEDURE  TO 
ATTACH  EACH  FILE  LISTED  IN  THE  AUDIT,  COPY  AND  CATALOG  IT, 
AND  PURGE  THE  ORIGINAL  FILE.  THE  ONLY  RECORD  OF  THIS  IS  THE 
DAYFILE. 

TO  RENAME  THE  ID  ON  A  SINGLE  FILE,  USE  PROCEDURE  'NEWID'. 
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ERROR  MESSAGES 

AC  IGNORED  -  MUST  BE  10  CHARACTERS 

AC  WAS  THE  WRONG  LENGTH  AND  IS  IGNORED 

OLDID  AND  NEWID  ARE  THE  SAME 

NO  RENAME  NEEDED 
SELF-EXPLANATORY 

EXAMPLES 

1)  CHANGE  URID'S  FILES  TO  MYID.  THERE  IS  ONLY  ONE  PASSWORD 
ON  THE  FILES  AND  ALL  ARE  TO  RECEIVE  AN  XR  PASSWORD  OF 
MYXR: 

BEGIN, RENAMID, , URID,MYID,XR“MYXR. 

2)  CHANGE  URID'S  FILES  TO  MYID.  THERE  ARE  FIVE  POSSIBLE 
PASSWORDS  ON  THE  FILES.  ALL  ARE  TO  RECEIVE  AN  XR 
PASSWORD  OF  MYXR  AND  AN  AC  OF  1234567890. 

BEGIN , RENAMID, , UR  ID , MY ID , URXR , URTK , URXR 1 , UIRXR3 , PWX , 

MYXR, 1234567890. 


AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 
DATE  WRITTEN:  02/23/82 
DATE(S)  REVISED 

11/05/82  -  UPGRADE  TO  LEVEL  552 
04/26/84  -  MAKE  INTERACTIVE 

08/30/84  -  PUT  INTERACTIVE  VERSION  INTO  INTEACTIVE  FILE 
-  PUT  NON-INTERACTIVE  VERSION  INTO  REGULAR  FILE 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, .RENAMID, OUTPUT, MSACCES-<PASSWORD>. 
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PROCEDURE  'RUNBAS' 


PURPOSE 

COMPILE  AND  EXECUTE  BASIC  PROGRAM  (SIMILAR  TO  EDITOR  RUN, BAS 
FOR  USE  OUTSIDE  OF  EDITOR) 

FUNCTIONAL  CATEGORIES:  L2 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, RUNBAS, ,F, OUT. 

DESCRIPTION  OF  PARAMETERS 

F  -  INPUT  SOURCE  FILE  (REWOUND  BEFORE  COMPILE) 

OUT  -  LISTABLE  OUTPUT  (NOT  REWOUND) 

(IF  OUT-O,  NO  LIST  IS  PROVIDED,  ERROR  MESSAGES  PRINT 
AT  TERMINAL) 

DEFAULT  BEGIN  STATEMENT 
BEGIN, RUNBAS, ,*, OUT. 

(*  “  NO  DEFAULT) 

MAX  FL:  40000B 

REMARKS 

INPUT  AND  OUTPUT  ARE  CONNECTED  BEFORE  THE  BASIC  COMPILER 
IS  CALLED. 

ERROR  MESSAGES 
NO  INPUT  FILE. 

USER  DID  NOT  SPECIFY  AN  INPUT  FILE  (PARAMETER  'F') 


AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 


DATE  WRITTEN:  08/25/77 

DATE(S)  REVISED 

03/01/78  -  CONVERT  TO  CCL 


ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, .RUNBAS, OUTPUT, MSACCES-<PASSWORD>. 
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PROCEDURE  ' RUNFTN 


PURPOSE 

COMPILE  AND  EXECUTE  FTN  PROGRAM  (SIMILAR  TO  EDITOR  RUN , FTN 
FOR  USE  OUTSIDE  OF  EDITOR) 

FUNCTIONAL  CATEGORIES:  L2 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, RUNFTN,, F.LGO. 

DESCRIPTION  OF  PARAMETERS 

F  -  FILE  TO  BE  COMPILED 

(MUST  BE  SPECIFIED  -  AVOID  LFN  'INPUT') 

LGO  -  FILE  TO  CONTAIN  RELOCATABLE  OBJECT  MODULE 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  THAT  OF  THE  CURRENT  FTN  COMPILER 

REMARKS 

AFTER  COMPLETION,  INPUT  AND  OUTPUT  ARE  CONNECTED. 

ERROR  MESSAGES 
NO  INPUT  FILE. 

USER  DID  NOT  SPECIFY  AN  INPUT  FILE  (PARAMETER  ' F ' ) 


AUTHOR 

SHARON  E  GOOD  -  DTNSRDC  CODE  1892.1 


DATE  WRITTEN:  07/27/77 

DATE (S)  REVISED 

03/01/78  -  CONVERT  TO  CCL 


ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN , DOCGET , , PROCFIL , , RUNFTN , OUTPUT , MSACCES-<PASSWORD> . 


04/30/84 


2-136 


RUNFTN  -  1  OF  1 


PROCEDURE  ' RUNFTN5 ' 


PURPOSE 

COMPILE  AND  EXECUTE  FTN5  PROGRAM  (SIMILAR  TO  EDITOR  RUN, FTN5 
FOR  USE  OUTSIDE  OF  EDITOR) 

FUNCTIONAL  CATEGORIES:  L2 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, RUNFTN5 ,, F , LGO . 

DESCRIPTION  OF  PARAMETERS 

F  -  FILE  TO  BE  COMPILED 

(MUST  BE  SPECIFIED  -  AVOID  LFN  ' TNPUT') 

LGO  -  FILE  TO  CONTAIN  RELOCATABLE  OBJECT  MODULE 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  THAT  OF  THE  CURRENT  FTN5  COMPILER 

REMARKS 

AFTER  COMPLETION,  INPUT  AND  OUTPUT  ARE  CONNECTED. 

ERROR  MESSAGES 
NO  INPUT  FILE. 

USER  DID  NOT  SPECIFY  AN  INPUT  FILE  (PARAMETER  ' F ’ ) 


AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  05/19/82 

DATE (S)  REVISED 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, ,RUNFTN5, OUTPUT, MSACCES»<PASSWORD>. 
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PROCEDURE  1 RUNMNF' 


PURPOSE 

COMPILE  AND  EXECUTE  MNF  PROGRAM  UNDER  INTERCOM 

FUNCTIONAL  CATEGORIES:  L2 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, RUNMNF, ,F. 

DESCRIPTION  OF  PARAMETER 

F  -  FILE  TO  BE  COMPILED 

(MUST  BE  SPECIFIED  -  AVOID  LFN  'INPUT') 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  53000B  MINIMUM  (NO  EFL  NEEDED) 

Remarks 

BEFORE  USING  RUNMNF,  ATTACH  OR  CREATE  A  SOURCE  INPUT  FILE 
' F '  (NETED  OR  EDITOR  MAY  BE  USED  TO  CREATE  IT). 

' F '  IS  REWOUND  BY  THE  PROCEDURE  BEFORE  COMPILATION. 

INPUT  AND  OUTPUT  ARE  AUTOMATICALLY  CONNECTED  WHEN  EXECUTION 
BEGINS.  AFTER  COMPLETION,  INPUT  AND  OUTPUT  REMAIN 
CONNECTED. 

TO  RE-EXECUTE  PROGRAM  ' F ' ,  DO  ANOTHER  BEGIN, RUNMNF . 

ERROR  MESSAGES 
NO  INPUT  FILE. 

USER  DID  NOT  SPECIFY  AN  INPUT  FILE  (PARAMETER  ’ F ' ) 


AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  07/29/77 

DATE(S)  REVISED 
08/24/77 
09/24/77 

03/01/78  -  CONVERT  TO  CCL 
02/02/82  -  ADD  461PRODUCTS 

-  DO  NOT  RETURN  LGO 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, ,PROCFIL, , RUNMNF, OUTPUT, MSACCES-<PASSWORD> . 
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PROCEDURE  'RUNPAS' 


PURPOSE 

COMPILE  AND  EXECUTE  PASCAL  PROGRAM  UNDER  INTERCOM 

FUNCTIONAL  CATEGORIES:  L2 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, RUNPAS, , F,OUT. 

DESCRIPTION  OF  PARAMETERS 

F  -  FILE  TO  BE  COMPILED 

(MUST  BE  SPECIFIED  -  AVOID  LFN  'INPUT') 

OUT  -  FILE  TO  CONTAIN  COMPILATION  LISTING 
(RETAINED  ONLY  IF  COMPILATION  FAILS) 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL: 

REMARKS 

BEFORE  USING  RUNPAS,  ATTACH  OR  CREATE  A  SOURCE  INPUT  FILE 
'F'  (NETED  OR  EDITOR  MAY  BE  USED  TO  CREATE  IT), 

'F'  IS  REWOUND  BY  THE  PROCEDURE  BEFORE  COMPILATION. 

TO  RE-EXECUTE  PROGRAM  'F',  TYPE  ' LGO * . 

ERROR  MESSAGES 

FILE  <OUT>  HAS  THE  COMPILATION  LISTING 

COMPILATION  FAILED.  USE  NETED  OR  EDITOR  OR  ROUTE  TO  A 
PRINTER  TO  FIND  THE  ERRORS. 

NO  INPUT  FILE. 

USER  DID  NOT  SPECIFY  AN  INPUT  FILE  (PARAMETER  'F') 


AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  1979 

DATE(S)  REVISED 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, .RUNPAS, OUTPUT, MSACCES-<PASSWORD>. 
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PROCEDURE  ' RUNSEQ ' 


PURPOSE 

COMPILE  AND  EXECUTE  FTN.SEQ  PROGRAM  (USES  TS  OPTION) 

FUNCTIONAL  CATEGORIES:  L2 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, RUNSEQ, ,F,LGO. 

DESCRIPTION  OF  PARAMETERS 

F  -  FILE  TO  BE  COMPILED 

(MUST  BE  SPECIFIED  -  AVOID  LFN  'INPUT') 

LGO  -  FILE  TO  CONTAIN  RELOCATABLE  OBJECT  MODULE 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  THAT  OF  THE  CURRENT  FTN  COMPILER 

REMARKS 

THIS  PROCEDURE  IS  FOR  FORTRAN  SOURCE  PROGRAMS  IN  SEQUENCED 
MODE. 

FOR  TS  OPTION  FOR  STANDARD  FORMATTED  FTN  SOURCE  CODE,  USE 
'RUNTS' . 

AFTER  COMPLETION,  INPUT  AND  OUTPUT  ARE  CONNECTED. 

ERROR  MESSAGES 
NO  INPUT  FILE. 

USER  DID  NOT  SPECIFY  AN  INPUT  FILE  (PARAMETER  ' F ' ) 


AUTHOR 

SHARON  E  GOOD  -  DTNSRDC  CODE  1892.1 


DATE  WRITTEN:  07/27/77 

DATE (S)  REVISED 

03/01/78  -  CONVERT  TO  CCL 


ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, .RUNSEQ , OUTPUT ,MSACCES-<PASSWORD> . 
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PROCEDURE  'RUNTS' 


PURPOSE 

COMPILE  AND  EXECUTE  FTN.TS  PROGRAM 

FUNCTIONAL  CATEGORIES:  L2 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, RUNTS,  ,-F,LGO. 

DESCRIPTION  OF  PARAMETERS 

F  -  FILE  TO  BE  COMPILED 

(MUST  BE  SPECIFIED  -  AVOID  LFN  'INPUT') 

LGO  -  FILE  TO.  CONTAIN  RELOCATABLE  OBJECT  MODULE 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  THAT  OF  THE  CURRENT  FTN  COMPILER 

REMARKS 

AFTER  COMPLETION,  INPUT  AND  OUTPUT  ARE  CONNECTED. 

ERROR  MESSAGES 
NO  INPUT  FILE. 

USER  DID  NOT  SPECIFY  AN  INPUT  FILE  (PARAMETER  ' F ' ) 


AUTHOR 

SHARON  E  GOOD  -  DTNSRDC  CODE  1892.1 


DATE  WRITTEN:  07/27/77 

DATE (S)  REVISED 

03/01/78  -  CONVERT  TO  CCL 


ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, .RUNTS, OUTPUT, MSACCES-<PASSWORD>. 
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PROCEDURE  ' SEGLD ' 


PURPOSE 

CREATE  A  SEGLOAD  ABSOLUTE  FILE 

FUNCTIONAL  CATEGORIES:  LO  Q3 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

SYSTEM  PUBLIC-ACCESS  INTERACTIVE  PROCEDURE  FILE 

USAGE 

BEGIN , SEGLD, , SEGDIR , LGO , ABS . 

BEGIN, SEGLD, I, <PARAMS>  <—  FOR  INTERACTIVE  VERSION 

BEGIN, SEGLD, I,?  <—  FOR  INTERACTIVE  PROCESSING 

DESCRIPTION  OF  PARAMETERS 

SEGDIR  -  FILE  CONTAINING  SEGLOAD  DIRECTIVES 
(REWOUND  BEFORE  USE) 

LGO  -  RELOCATABLE  OBJECT  FILE 

ABS  -  ABSOLUTE  OBJECT  FILE 

(MAY  BE  CATALOGED) 

DEFAULT  BEGIN  STATEMENT 

BEGIN, SEGLD, .SEGDIR, LGO, ABS. 

MAX  FL:  DEPENDS  UPON  PROGRAM  BEING  LOADED 

REMARKS 

NONE 

AUTHOR 

SHARON  E  GOOD  -  DTNSRDC  CODE  1892.1 

DATE  WRITTEN:  01/16/78 

DATE (S)  REVISED 

03/01/78  -  CONVERT  TO  CCL 
05/15/84  -  MAKE  INTERACTIVE 

08/30/84  -  PUT  INTERACTIVE  VERSION  INTO  INTEACTIVE  FILE 
-  PUT  NON-INTERACTIVE  VERSION  INTO  REGULAR  FILE 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN , DOCGET , , PROCFIL , , SEGLD , OUTPUT , MSACCES“<PASSWORD> . 
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PROCEDURE  'SEGO' 


PURPOSE 

SEGLOAD  AND  EXECUTE  PROGRAM  WITH  OPTIONAL  LIBRARY 

FUNCTIONAL  CATEGORIES:  Q7 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

SYSTEM  PUBLIC-ACCESS  INTERACTIVE  PROCEDURE  FILE 

USAGE 

BEGIN, SEGO, , OBJ, SEG, ID, LIB1. 

BEGIN, SEGO, I,  <PARAMS>  <~  FOR  INTERACTIVE  VERSION 
BEGIN, SEGO, I,?  <—  FOR  INTERACTIVE  PROCESSING 

DESCRIPTION  OF  PARAMETERS 

OBJ  -  OBJECT  CODE  PERMANENT  FILE  NAME 

SEG  -  SEGLOAD  DIRECTIVES  PERMANENT  FILE  NAME 

ID  -  USER  ID  FOR  OBJ,  SEG 

LIB1  -  OPTIONAL  PUBLIC  LIBRARY  OF  SUBROUTINES 

DEFAULT  BEGIN  STATEMENT 
NONE 

MAX  FL:  AS  REQUIRED  BY  THE  SEGLOADED  PROGRAM 
REMARKS 

ALLOWS  INTERACTIVE  USE  OF  SEGLOAD. 

ABSOLUTE  CODE  MODULE  IN  FILE  'ABS'  AT  TERMINATION. 

DUMMY  SEGLOAD  POSSIBLE  IF  SEG  CONTAINS  '  TREE  <MAIN>  ' . 
EXAMPLE 

BEGIN, SEGO, ,MYOBJECTFILE,MYSEGDIRECT,MYID, IMSL. 

AUTHOR 

SHARON  E  GOOD  -  DTNSRDC  1892.1 

DATE  WRITTEN:  03/20/81 

DATE (S)  REVISED 

05/15/84  -  MAKE  INTERACTIVE 

08/30/84  -  PUT  INTERACTIVE  VERSION  INTO  INTEACTIVE  FILE 
-  PUT  NON-INTERACTIVE  VERSION  INTO  REGULAR  FILE 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, , SEGO, OUTPUT, MSACCES-<PASSWORD>. 
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PROCEDURE  'SELDUMP 


PURPOSE 

CREATE  BACKUP  DUMP  TAPE  OF  THE  USER  PERMANENT  FILES  OF  AN 
ACCOUNT  NUMBER 

FUNCTIONAL  CATEGORIES:  Q4  K3 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN , SELDUMP , , AC, VSN1 , VSN2 , VSN3 , VSN4 , SN , D, PW . 

DESCRIPTION  OF  PARAMETERS 

AC  -  MUST  CORRESPOND  TO  ACCESS  NUMBER  ON  CHARGE  CARD 

VSN1  -  TAPE  DIEBOLD  OR  SLOT  NUMBER 

(6  CHARACTERS  OR  LESS) 

VSN2  -  EXTERNAL  STICKER  LABEL 
(SLOT  TAPES  ONLY) 

VSN3/4  -  SAME  AS  VSNl/2  FOR  SECOND  TAPE 

SN  -  SET  NAME  (DEFAULT:  PUBLIC  PERMANENT  FILE  SET) 

D  -  TAPE  DENSITY  (DEFAULT:  GE  (9  TRK,  6250  BPI)) 

PW  -  READ  PASSWORD  (DEFAULT:  PUBLIC  PERMANENT  FILE  SET 

VALUE) 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  20000B 

REMARKS 

OUTPUT  IS  MINI  AUDIT  LISTING  PF  NAME,  CYCLE,  ID  FOR  EACH 
FILE  AND  VSN  OF  TAPE  ON  WHICH  IT  WAS  DUMPED. 

ERROR  MESSAGES 

’’'DIFFERENT  DUMP  TYPE  OR  MODE  RUNNING* 

ONL^  ONE  DUMP  PROGRAM  MAY  RUN  AT  A  TIME  AND  ANOTHER  JOB 
IS  RUNNING  ONE.  WAIT  AWHILE  AND  RE-SUBMIT  THE  JOB. 

EXAMPLE 

XXXXYYY.GEl , . . . . 

CHARGE, XXXX,2fZZZZ99999 .  «  ACCESS  #  FOR  1234567890 

BEG IN, SELDUMP, , 1234567890, CA9999. 

<EOI> 
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AUTHOR 

SHARON  E  GOOD  -  DTNSRDC  CODE  1892.1 

DATE  WRITTEN:  EARLY  1975 

DATE (S)  REVISED 

03/01/78  -  CONVERT  TO  CCL 
09/23/80  -  ADD  VSN3  AND  VSN4 
02/24/81  -  ADD  SN,  D,  PW  -  SEG 
09/20/82  -  UPGRADE  FOR  MULTIPLE  DIRECTORIES 
-  CHANGE  DEFAULT  DENSITY  TO  GE 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, .SELDUMP, OUTPUT, MSACCES-<PASSWORD> . 


04/30/84 


2-145 


SELDUMP 


2  OF 


PROCEDURE  'SELLOAD 


PURPOSE 

RESTORE  SELECTED  ROUTINES  FROM  A  BACKUP  DUMPF  TAPE 

FUNCTIONAL  CATEGORIES:  Q4  K4 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN , SELLOAD, , VSN1 , VSN2 , V , VSN3 , VSN4 , SN , E , D, PW . 

DESCRIPTION  OF  PARAMETERS 

VSN1  -  TAPE  DIEBOLD  OR  SLOT  NUMBER  (FIRST  OR  ONLY  TAPE) 
(6  CHARACTERS  OR  LESS) 

VSN2  -  EXTERNAL  STICKER  LABEL  (FIRST  OR  ONLY  TAPE) 

(SLOT  TAPES  ONLY) 

V  -  REEL  NUMBER  IN  MULTI-REEL  FILE 

(DEFAULT:  1) 

VSN3  -  TAPE  DIEBOLD  OR  SLOT  NUMBER  (SECOND  TAPE) 

(6  CHARACTERS  OR  LESS) 

VSN4  -  EXTERNAL  STICKER  LABEL  (SECOND  TAPE) 

(SLOT  TAPES  ONLY) 

SN  -  SET  NAME  (DEFAULT:  PUBLIC  PERMANENT  FILE  SET) 

E  -  EDITION  NUMBER  OF  TAPE 

(DEFAULT:  00  -  LEVEL  508) 

D  -  TAPE  DENSITY  (DEFAULT:  GE  (9  TRK,  6250  BPI)) 

.PW  -  EXTEND  PASSWORD 

(DEFAULT:  PUBLIC  PERMANENT  FILE  SET  VALUE) 

DEFAULT  BEGIN  STATEMENT 
.  NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  20000B 

REMARKS 

NONE 

DATA  CARDS 

ONE  CARD  PER  FILE,  CONTAINING  ONE  OF  THE  FOLLOWING: 
PF-PFNAME,ID=XXXX,CY«NN.  TO  RESTORE  CYCLE  NN 

PF-PFNAME.ID-XXXX.  TO  RESTORE  ALL  CYCLES 

ID-XXXX.  ALL  FILES  OF  USER  XXXX 

EXAMPLE 

XXXXYYY.GEl . 

CHARGE , XXXX , ZZZZZ99999 . 

BEGIN, SELLOAD, .CA9999. 

'  7/8/9  EOR 

PF-PFNl , ID* XXXX.  ALL  CYCLES 

PF-PFN2, ID-XXXX, CY=4.  ONLY  CYCLE  4 

<EOI> 
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AUTHORS 

SHARON  E  GOOD  -  DTNSRDC  CODE  1892.1 
DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 


DATE  WRITTEN:  EARLY  1975  (SEG) 


DATE(S)  REVISED 
03/01/78  -  DVS  - 
02/02/79  -  SEG  - 
09/24/80  -  SEG  - 
02/24/81  -  SEG  - 
09/20/82  -  SEG  - 


CONVERT  TO  CCL 

ADD  V,  VSN3 ,  VSN4  PARAMETERS 

ADD  SN,  E  PARAMS,  MODIFY  FOR  LEVEL  508 

ADD  D,  PW  PARAMETERS 

UPGRADE  FOR  MULTIPLE  DIRECTORIES 

CHANGE  DEFAULT  DENSITY  TO  GE 


ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, , SELLOAD, OUTPUT, MSACCES-<PASSWORD> . 
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PROCEDURE  'SEND 


PURPOSE 

SEND  MESSAGES  TO  AN  INTERCOM  USER  WHO  IS  NOT  LOGGED  IN; 

LIST  MESSAGES 

FUNCTIONAL  CATEGORIES:  QO 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, SEND, ,FCN,<PARAMETERS>. 

DESCRIPTION  OF  PARAMETERS 

FCN  -  ONE  OF  THE  FOLLOWING: 

A  OR  ANY  -  CHECK  FOR  ANY  MESSAGES 
C  OR  CREATE  -  CREATE  A  MAILBOX 
E  OR  EXPLAIN  -  TYPE  EXPLANATION  OF  PROCEDURE 
L  OR  LIST  -  LIST  CONTENTS  OF  MAILBOX 

S  OR  SEND  -  SEND  TO  ANOTHER  MAILBOX 

(DEFAULT) 

< PARAMETER S>  -  NOT  USED  BY  FUNCTIONS  ANY,  CREATE  OR  EXPLAIN. 

OPTIONAL  FOR  LIST  AND  SEND  (SEE  FUNCTION 
DESCRIPTIONS  BELOW) 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  35000B 

REMARKS 

IN  ORDER  TO  RECEIVE  MESSAGES,  THE  USER  MUST  HAVE  A 
PERMANENT  FILE  NAMED  'SENDFIL',  HAVING  NO  PASSWORDS. 

FUNCTIONS 

ANY 

BEGIN, SEND, , ANY. 

THIS  FUNCTION  CHECKS  TO  SEE  IF  THERE  ARE  ANY  MESSAGES. 

CREATE 

BEG IN, SEND,, CREATE. 

CREATE  A  PERMANENT  FILE  WITH  PFN  OF  'SENDFIL'. 

THIS  IS  REQUIRED  BEFORE  A  USER  CAN  RECEIVE  MESSAGES. 
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LIST 

BEGIN, SEND, .LIST, OUTPUT. 

LIST  ANY  MESSAGES  ON  FILE  'OUTPUT'  (PARAMETER  MAY  BE 
OMITTED.  IF  'OUTPUT'  IS  NOT  CONNECTED,  THE  USER  IS 
INFORMED  THAT  THE  FILE  WAS  WRITTEN. 

IN  LISTING,  IF  THE  FIRST  CHARACTER  OF  A  LINE  IS  1, 
SPACE,  0,  ~  OR  +,  IT  IS  TREATED  AS  CARRIAGE  CONTROL. 
ALL  OTHER  LINES  ARE  SHIFTED  ONE  PLACE  TO  THE  RIGHT 
BEFORE  LISTING. 

AFTER  LISTING,  THE  USER  IS  ASKED  WHETHER  THE  MESSAGES 
SHOULD  BE  SCRATCHED.  THE  USER  MUST  RESPOND  Y  OR  YES 
(FOR  YES)  OR  ANYTHING  ELSE  (FOR  NO) . 


SEND 

BEGIN , SEND , , SEND , TO , INPUT . 

BEGIN , SEND, , , TO , INPUT . 

SEND  MESSAGES  TO  USER  'TO'  (4-CHARACTER  USER  ID  OR  U 
FOR  USERSERVIC).  IF  OMITTED  OR  INVALID,  THE  USER  IS 
PROMPTED  FOR  A  4-CHARACTER  USER  ID  (MUST  START  WITH  A, 
C,  P,  R,  S)  OR  USERSERVIC  (MAY  BE  ABBREVIATED  U  OR 
USER) . 

IF  THE  NEXT  PARAMETER  (INPUT)  IS  OMITTED  (OR  'INPUT'), 
THE  MESSAGES  ARE  READ  FROM  THE  TERMINAL.  IF  THE 
PARAMETER  IS  GIVEN  AND  IS  NOT  'INPUT',  THE  LOCAL  FILE 
OF  THAT  NAME  IS  REWOUND  AND  COPIED  THRU  END-OF- 
INFORMATION.  A  MESSAGE  IS  TYPED  STATING  THAT  THE  FILE 
IS  BEING  READ. 

MESSAGES  ARE  UP  TO  80  CHARACTERS  LONG;  THE  FIRST  OF 
WHICH  MAY  BE  USED  FOR  CARRIAGE  CONTROL. 


MESSAGES 
GENERAL  . 

INVALID  FUNCTION  -  MUST  BE  ONE  OF 
ANY  -  CREATE  -  EXPLAIN  -  LIST  -  SEND 

FIRST  PARAMETER  OF  EXECUTE  STATEMENT  WAS  INVALID 

FUNCTION  ANY— 

SOMEONE  IS  SENDING  YOU  A  MESSAGE 

CANNOT  ACCESS  YOUR  SENDFIL  UNTIL  SENDER  COMPLETES  THE 
MESSAGE 

UNEXPECTED  RETURN  CODE  (NNNB)  FROM  ATTACH 
PLEASE  TRY  AGAIN  LATER 

IF  SAME  ERROR  OCCURS  AGAIN,  SEE  CCRM,  3-7,  AND/OR  CALL 
USER  SERVICES 

YOU  DO  NOT  HAVE  A  SENDFIL 

TO  CREATE  ONE,  USE  BEGIN , SEND, , CREATE. 

YOU  HAVE  NO  MESSAGES 

YOU  HAVE  SOME  MESSAGES 

TO  LIST  THEM,  USE  BEGIN, SEND, .LIST, OUTPUT. 
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FUNCTION  CREATE— 

CT  ID-  XXXX  PFN-SENDFIL 
CT  CY-  NNN  00000000  PRUS  $0000.00  /DAY 
CREATE  WAS  SUCCESSFUL 

ERROR  DURING  CATALOG 
PLEASE  TRY  AGAIN  LATER 
COULD  NOT  CATALOG 

ERROR  TRYING  TO  GET  PF  SPACE 
PLEASE  TRY  AGAIN  LATER 

COULD  NOT  GET  PERMANENT  FILE  SPACE 

YOU  ALREADY  HAVE  A  SENDFIL 

CANNOT  CREATE  A  SECOND  SENDFIL 

FUNCTION  LIST- 

EX  ID-  '  XXXX  PFN-SENDFIL 

EX  CY-  NNN  00000000  PRUS  $0000.00  /DAY 

SENDFIL  CONTENTS  WERE  SUCCESSFULLY  SCRATCHED 

MESSAGES  WRITTEN  ON  FILE  <LFN> 

OUTPUT  FILE  <LFN>  IS  NOT  CONNECTED  AND  CONTAINS 
LISTING  OF  MESSAGES. 

SHALL  I  SCRATCH  THE  MESSAGES  (Y  OR  N)  — 

ENTER  Y  OR  YES  TO  CLEAR  THE  MESSAGES. 

ENTER  ANYTHING  ELSE  TO  RETAIN  THEM. 

SORRY  -  SOMEONE  IS  SENDING  YOU  A  MESSAGE 
PLEASE  TRY  AGAIN  LATER 

CANNOT  LIST  MESSAGES  WHILE  SOMEONE  IS  SENDING  YOU  ONE 

UNEXPECTED  RETURN  CODE  (NNNB)  FROM  ATTACH 
PLEASE  TRY  AGAIN  LATER 

ERROR  WHILE  ATTACHING  YOUR  SENDFIL.  IF  IT  HAPPENS 
AGAIN,  SEE  CCRM,  3-7,  AND/OR  CALL  USER  SERVICES. 

FUNCTION  SEND— 

CALL  AGAIN 

RESPONSE  TO  USER  ENTRY  OF  'QUIT' 

ENTER  YOUR  MESSAGES  -  END  WITH  END 

BEGIN  ENTERING  UP-TO-80-CHARACTER  MESSAGES.  END  WITH 
SEPARATE  LINE  CONTAINING  END  AND  NO  OTHER  NON-BLANK 
CHARACTERS.  THERE  IS  NO  MORE  PROMPTING  UNTIL  END  IS 
ENCOUNTERED. 

FROM:  YOUR-USER-ID 
TO  :  TO-USER-ID 

SENDFIL  WAS  SUCCESSFULLY  ATTACHED 
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INVALID.  MUST  BE  USERSERVIC  OR  4  CHARACTERS  STARTING 
WITH  A,  C,  P,  R  OR  S. 

PLEASE  RE-ENTER  IT  (OR  'QUIT'  TO  STOP)- 
ENTER  ONE  OF  THE  FOLLOWING: 

4-CHARACTER  USER- ID  (START  WITH  A/C/P/R/S) 
USERSERVIC  (OR  U  OR  USER) 

QUIT 

READING  FROM  FILE  XXXXXXX 

MESSAGES  ARE  BEING  READ  FROM  INDICATED  FILE 

SORRY  -  I  COULDN'T  SEND  YOUR  MESSAGES 
PLEASE  TRY  AGAIN  LATER 

EXTEND  OF  SENDFIL  FAILED 

SORRY,  XXXX  IN  NOT  ACCESSIBLE 

SPECIFIED  USER'S  SENDFIL  IS  BEING  USED  BY  SOMEONE  ELSE 

SORRY,  XXXX  CANNOT  RECEIVE  MESSAGES 

SPECIFIED  USER  DOES  NOT  HAVE  A  FILE  CALLED  SENDFIL 

TO  WHOM  (4-CHARACTER  USER-  ID  -OR-  USERSERVIC) - 

USER-ID  ON  EXECUTE  CARD  WAS  OMITTED  OR  INVALID.  ENTER 
IT  NOW. 

. . .  TRUNCATED 

ONLY  FIRST  80  CHARACTERS  READ.  LISTED  CHARACTERS 
IGNORED. 

YOUR  MESSAGE  HAS  BEEN  SENT 

THE  SENDFIL  WAS  SUCCESSFULLY  EXTENDED 


AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 
DATE  WRITTEN:  05/20/77 


DATE (S)  REVISED 

03/01/78  -  CONVERT  TO  CCL 


ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, .SEND, OUTPUT, MSACCES“<PASSWORD>. 
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PROCEDURE  'SORT 


PURPOSE 

SORT  (SORTMRG)  UP  TO  5  'DISPLAY'  FIELDS  USING  'COBOL6' 
COLLATING  SEQUENCE  ('FILE'  CARDS  REQUIRED) 

FUNCTIONAL  CATEGORIES:  Ml 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, SORT,, IN, OUT, OUTPUT, NF, SI, Nl, ADI, S2,N2,AD2, S3, N3.AD3, 
S4,N4,AD4,S5,N5,AD5. 

DESCRIPTION  OF  PARAMETERS 

IN  -  INPUT  FILE  TO  BE  SORTED 

OUT  -  OUTPUT  SORTED  FILE 

OUTPUT  -  LISTABLE  OUTPUT  (SORT  DIRECTIVES) 

NF  -  NUMBER  OF  FIELDS  TO  BE  SORTED 

SI  -  STARTING  POSITION  OF  FIRST  SORT  FIELD 

N1  -  NUMBER  OF  POSITIONS  IN  FIRST  SORT  FIELD 

ADI  -  A  -  ASCENDING  SORT 

D  -  DESCENDING  SORT 
S2,N2,AD2  -  SAME  FOR  SECOND  SORT  FIELD 
•  •  • 

S5,N5,AD5  -  SAME  FOR  FIFTH  SORT  FIELD 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  60000B  (USUALLY) 

REMARKS 

THE  USER  MUST  SUPPLY  'FILE'  CARDS  FOR  THE  INPUT  AND  OUTPUT 
FILES  (IN  AND  OUT)  BEFORE  USING  THIS  PROCEDURE.  THEY  MUST 
EACH  HAVE  AT  LEAST  THE  BT,  RT  AND  MRL  PARAMETERS. 

FOR  BT-C.RT-Z  FILES,  USE  PROCEDURE  'SORTCZ'. 

ERROR  MESSAGES 

TOO  MANY  FIELDS  (MAX  5) 

USER  SPECIFIED  AN  NF  GREATER  THAN  5 

EXAMPLE 

SORT  A  CARD- IMAGE  FILE  ON  COLUMNS  1-5  (ASCENDING)  AND 
41-50  (DESCENDING): 

FILE, INFILE, BT-C.RT-Z, MRL-90. 

FILE , OUTFILE , BT-C , RT-Z , MRL-90 . 

BEGIN, SORT, .INFILE, OUTFILE,, 2, 1,5, A, 41,10, D. 
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AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 


DATE  WRITTEN:  11/03/77 

DATE(S)  REVISED 

03/01/78  -  CONVERT  TO  CCL 


ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, .SORT, OUTPUT, MSACCES-<PASSWORD>. 
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PROCEDURE  ' SORTCZ ' 


PURPOSE 

SORT  (SORTMRG)  UP  TO  5  'DISPLAY'  FIELDS  USING  'COBOL6' 
COLLATING  SEQUENCE  ('FILE'  CARDS  NOT  REQUIRED) 

FUNCTIONAL  CATEGORIES:  Ml 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, SORTCZ,, IN, OUT, OUTPUT, MRL.NF, SI, Nl, ADI, S2,N2,AD2, 
S3,N3,AD3,S4,N4,AD4,S5,N5,AD5. 

DESCRIPTION  OF  PARAMETERS 

IN  -  INPUT  FILE  TO  BE  SORTED 

OUT  -  OUTPUT  SORTED  FILE 

OUTPUT  -  LISTABLE  OUTPUT  (SORT  DIRECTIVES) 

MRL  -  MAXIMUM  RECORD  LENGTH  (ROUNDED  UP  TO  MULTIPLE  OF 

10) 

NF  -  NUMBER  OF  FIELDS  TO  BE  SORTED 

SI  -  STARTING  POSITION  OF  FIRST  SORT  FIELD 

Nl  -  NUMBER  OF  POSITIONS  IN  FIRST  SORT  FIELD 

ADI  -  A  -  ASCENDING  SORT 

D  -  DESCENDING  SORT 

S2,N2,AD2  -  SAME  FOR  SECOND  SORT  FIELD 
•  •  • 

S5,N5,AD5  -  SAME  FOR  FIFTH  SORT  FIELD 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  60000B  (USUALLY) 

REMARKS 

THIS  PROCEDURE  PROVIDES  'FILE'  CARDS  FOR  BOTH  'IN'  AND 
'OUT*.  EACH  DEFINES  BT-C.RT-Z.  MRL  IS  USER-SPECIFIED 
(DEFAULT:  MRL-90) 

TO  SUPPLY  'FILE'  CARDS,  USE  PROCEDURE  'SORT'. 

ERROR  MESSAGES 

TOO  MANY  FIELDS  (MAX  5) 

USER  SPECIFIED  AN  NF  GREATER  THAN  5 

EXAMPLE 

SORT  A  CARD-IMAGE  FILE  ON  COLUMNS  1-5  (ASCENDING)  AND 
41-50  (DESCENDING)  : 

BEGIN, SORTCZ,, INFILE, OUTFILE, ,90, 2, 1,5, A, 41,10, D. 


04/30/84 


2-154 


SORTCL 


1  OF  1 


AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  02/07/80 

DATE (S)  REVISED 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, .SORTCZ, OUTPUT, MSACCES=<PASSWORD>. 
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PROCEDURE  ' S2K260 ' 


PURPOSE 

ATTACH  FILES  FOR  S2000  (VERSION  2.60)  NATURAL  LANGUAGE, 
FORTRAN,  OR  COBOL  PROCEDURAL  LANGUAGE  INTERFACE. 

FUNCTIONAL  CATEGORIES:  LO  Q3 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE. 

USAGE 

BEGIN, S2K260, .LANG. 

DESCRIPTION  OF  PARAMETER 

LANG  -  COB  FOR  COBOL  LANGUAGE  INTERFACE  ROUTINE 

-  FOR  FOR  FORTRAN  LANGUAGE  INTERFACE  ROUTINE 

-  OMITTED  NATURAL  LANGUAGE 

DEFAULT  BEGIN  STATEMENT 

BEGIN, S2K260.  USE  NATURAL  LANGUAGE  ONLY 

MAX  FL:  15000B 

REMARKS 

THIS  PROCEDURE  ATTACHES  THE  FILES  FOR  SYSTEM  2000 
VERSION  2.60.  DO  NOT  USE  BEFORE  READING  THE  NEWSLETTER 
FROM  MRI  REGARDING  THE  FEATURES  AND  DIFFERENCES  IN  THIS 
VERSION  OF  SYSTEM  2000  (APRIL  1977). 

EXAMPLES 


FOR 

NATURAL 

LANGUAGE: 

BEGIN, S2K260. 

S2K260, .... 

EXECUTE  S2K 

FOR 

COBOL  INTERFACE: 

BEGIN, S2K260, ,COB. 

PLICOB,. . . . 
COPYR,PLILGO,LGO,2. 

PRECOMPILER 

COBOL, I-TAPE3 . 

FTN.I-TAPE3. 

COPYF, PLILGO, LGO. 

REQUIRED 

LGO. 

EXECUTE 

FOR 

FORTRAN 

INTERFACE: 

BEGIN, S2K260,, FOR. 

PLIFOR . 

COPYR , PLIGO, LGO, 2 . 

FTN.I-TAPE3 . 

COPYF, PLILGO, LGO. 

PRECOMPILER 

LGO. 

EXECUTE 
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AUTHOR 

SHARON  E  GOOD  -  DTNSRDC  CODE  1892.1 
BRUCE  D  BLACK  -  DTNSRDC  CODE  1892.1  (CDC) 

DATE  WRITTEN:  06/20/77 

DATE (S)  REVISED 

03/01/78  -  CONVERT  TO  CCL 

07/10/80  -  CHANGE  SETNAME  TO  USRVLB2 

08/05/80  -  CHANGE  'PLILG0260'  TO  'S2K260LGO' 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, .S2K260, OUTPUT, MSACCES-<PASSWORD>. 
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PROCEDURE  ' S2K280' 


PURPOSE 

ATTACH  FILES  FOR  S2000  (VERSION  2.80)  SELF-CONTAINED 
LANGUAGES,  REPORT  PROCESSOR,  FORTRAN  OR  COBOL  PROGRAMMING 
LANGUAGE  EXTENSION  (PLEX) . 

FUNCTIONAL  CATEGORIES:  LO  Q3 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, S2K280. .LANG, SIZE 
DESCRIPTION  OF  PARAMETERS 

LANG  -  COB  COBOL  PROGRAMMING  LANGUAGE  EXTENSION 

-  FOR  FORTRAN  PROGRAMMING  LANGUAGE  EXTENSION 

-  RWX  TO  CREATE  A  REPORT  WRITER  USER  EXIT 

-  OMITTED  SELF-CONTAINED  LANGUAGES 

SIZE  -  SMALL  SMALL  VERSION.  TO  BE  USED  WHEN  SMALL 

FL  DESIRED.  I/O  TIME  CAN  BE  EXPECTED  TO 
INCREASE.  IT  DOES  NOT  HAVE  THE  SUBMIT 
FEATURE  OR  THE  SELF-CONTAINED  FACILITY. 
THE  COMMAND  FILE,  DATA  FILE  AND  REPORT 
FILE  HAVE  BEEN  REMOVED. 

-  MEDIUM  MEDIUM  VERSION.  EQUIVALENT  IN  SIZE  TO 

S2K  VERSION  2.60. 

-  OMITTED  MEDIUM  VERSION 

-  ****  NOTE-  THE  SIZE  PARAMETER  CAN  ONLY  BE  USED 

WITH  THE  PLEX  LANGUAGES 

DEFAULT  BEGIN  STATEMENT 

BEGIN, S2K280.  USE  SELF-CONTAINED  LANGUAGES  ONLY 

MAX  FL:  15000B 
REMARKS 

THIS  PROCEDURE  ATTACHES  THE  FILES  FOR  SYSTEM  2000 
VERSION  2.80.  DO  NOT  USE  BEFORE  READING  THE  NEWSLETTER 
FROM  DTNSRDC  CODE  1892.1  REGARDING  THE  FEATURES  AND 
DIFFERENCES  IN  THIS  VERSION  OF  SYSTEM  2000  (1981). 

EXAMPLES 

FOR  SELF-CONTAINED  LANGUAGES: 

BEGIN, S2K280. 

S2K280 .  EXECUTE  S2K 
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FOR  COBOL  PROGRAMMING  LANGUAGE  EXTENSION: 

BEGIN, S2K280, , COB. 

PLICOB .....  PRECOMPILER 

COPYR, PLILGO, LGO, 2. 

COBOL, I-TAPE3 . 

COPYF, PLILGO, LGO. 

LGO.  EXECUTE 

FOR  SMALL  VERSION  OF  COBOL  PROGRAMMING  LANGUAGE  EXTENSION: 

BEGIN, S2K280, , COB, SMALL. 

PLICOB,... 

COPYR, PLILGO, LGO, 2. 

COBOL, I-TAPE3. 

COPYF, PLILGO, LGO. 

LGO. 

FOR  FORTRAN  PROGRAMMING  LANGUAGE  EXTENSION: 

BEGIN  S2K280..FOR. 

PL.IFOR , . . . . 

•  COPYR , PLIGO , LGO, 2. 

FTN.I-TAPE3, _ 

COPYF, PLILGO, LGO. 

LGO. 

FOR  CREATION  OF  A  REPORT  WRITER  USER  EXIT: 

BEGIN, S2K280, ,RWX. 

COPYR,RWEXIT,3. 

FTN , . . .  OR  COBOL . 

LGO. 


PRECOMPILER 


EXECUTE 


AUTHOR 

ANN  T  SOLLO  -  DTNSRDC  CODE  1892.1  (CDC) 

DATE  WRITTEN:  04/01/82 

DATE(S)  REVISED 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, , S2K280, OUTPUT, MSACCES»<PASSWORD>. 
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PROCEDURE  ' TAPRD 


PURPOSE 

COPY  ONE  OR  MORE  FILES  FROM  A  FIXED  LENGTH,  BLOCKED  STRANGER 
TAPE  TO  DISK 

FUNCTIONAL  CATEGORIES:  K1 

COMPUTERS  (OPERATING  SYSTEMS) 

CDC  6000/CYBER  170  (NOS/BE) 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

EXECUTE  STATEMENT 

BEGIN, TAPRD, ,PFN, ID, FILES, 

VSN,SLOT,L,F,N,D, 

MRL,RB,MBL. 

DESCRIPTION  OF  PARAMETERS 

PFN  -  PERMANENT  FILE  NAME  TO  BE  PROCESSED 

ID  -  ID  UNDER  WHICH  PFN  IS  CATALOGED 

(REQUIRED) 

FILES  -  NUMBER  OF  FILES  TO  COPY 

0  -  PFN  IS  A  SEQUENTIAL  FILE 

(DEFAULT:  1) 

VSN  -  VOLUME  SERIAL  NUMBER  OF  THE  TAPE 
(REQUIRED) 

SLOT  -  ONE  OF  THE  FOLLOWING: 

<SLOT  //>  -  VSN  IS  A  SLOT  TAPE 
OMITTED  -  VSN  IS  A  COMPUTER  CENTER  (DIEBOLD) 
TAPE 

L  -  ONE  OF  THE  FOLLOWING: 

0  -  THE  TAPE  IS  TO  BE  UNLABELLED 

<LABEL>  -  THE  TAPE  IS  TO  BE  LABELLED  WITH 
L-<LABEL> 

OMITTED  -  THE  TAPE  IS  TO  BE  LABELLED  WITH 
L-<ID> 

F  -  ONE  OF  THE  FOLLOWING: 

L  -  LONG  STRANGER  TAPE 

OMITTED  -  STRANGER  TAPE 
N  -  ONE  OF  THE  FOLLOWING: 

OMITTED  -  ASCII  (USASCII) 

EB  -  EBCDIC 

D  -  TAPE  DENSITY  (GE/PE/HD/HY/HI) 

(JOB  STATEMENT  MUST  HAVE  A  MATCHING  TAPE  REQUEST) 
MRL  -  MAXIMUM  RECORD  LENGTH 

(DEFAULT:  80;  UPDATE  PL'S  WILL  BE  80) 

RB  -  NUMBER  OF  RECORDS  PER  BLOCK 

(DEFAULT:  AO) 

MBL  -  MAXIMUM  BLOCK  LENGTH  (MRL  TIMES  RB) 

(DEFAULT:  3200) 

(IF  MBL  >  38A0  (9-TRACK)  OR  >  5120  (7-TRACK) , 

THEN  F-L  MUST  BE  SPECIFIED) 
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DEFAULT  EXECUTE  STATEMENT 

BEGIN , TAPRD, , PFN , ID-* , FILES- 1 , VSN-* , SLOT- , L-< ID> , F-S , N-US , 
D-GE , MRL-80 , RB- AO , MBL-3200 . 

*  -  USER  MUST  SUPPLY 

MAX  FL:  60000B  (IF  UPDATE  REQUIRED);  21000B  OTHERWISE 

REMARKS 

NONE 

ERROR  MESSAGES 

TAPRD  REQUIRES  MAG  TAPE  AND 
MUST  BE  RUN  FROM  BATCH 

YOU  TRIED  TO  RUN  THE  PROCEDURE  UNDER  INTERCOM.  YOU  MUST 
PREPARE  A  BATCH  JOB  (DON'T  FORGET  THE  TAPE  PARAMETER  IN 
THE  JOB  STATEMENT)  AND  ROUTE  IT  TO  THE  INPUT  QUEUE. 

ID  MUST  BE  SPECIFIED 

YOU  MUST  SPECIFY  AN  ID.  THERE  IS  NO  DEFAULT. 

VSN  MUST  BE  SPECIFIED 

YOU  MUST  SPECIFY  THE  TAPE  VOLUME  SERIAL  NUMBER.  THERE  IS 
NO  DEFAULT. 

EXAMPLES 

1)  COPY  ONE  FILE  FROM  THE  UNLABELLED  STRANGER  TAPE  IN  SLOT 
98  INTO  PERMANENT  FILE  MYFILE.  THE  CARD  IMAGES  ON  THE 
TAPE  ARE  BLOCKED  40  PER  PHYSICAL  RECORD. 

BEGIN, TAPRD, ,  MYFILE, MYID, ,MYTAPE,98,0. 

2)  COPY  3  DATA  FILES  FROM  9-TRACK,  1600  BPI,  ASCII  TAPE 
MYTAPE.  THE  DATA  RECORDS  ARE  133  CHARACTERS  LONG, 

BLOCKED  30  (MBL-3990,  SO  THIS  IS  AN  L-TAPE) . 

BEGIN , TAPRD, .MYDATA, MYID, 3 , CA8976 , , <MYLABEL> , L , US , PE , 
133,30,3990. 


AUTHOR 

DAVID  V.  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  10/07/83 

DATE (S)  REVISED 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, , TAPRD, OUTPUT, MSACCES-<PASSWORD>. 
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TAPRD 


PROCEDURE  ' TAPWR 1 


PURPOSE 

COPY  A  SEQUENTIAL  FILE  OR  AN  UPDATE  PL  ONTO  A  FIXED  LENGTH, 
BLOCKED  STRANGER  TAPE 

FUNCTIONAL  CATEGORIES:  K1 

COMPUTERS  (OPERATING  SYSTEMS) 

CDC  6000/CYBER  170  (NOS/BE) 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

EXECUTE  STATEMENT 

BEGIN , TAPWR , , PFN, ID, DECK , 

VSN , SLOT ,L,F,N,D,T,C, 

MRL,RB,MBL, 

UO.PWl ,PW2. 

DESCRIPTION  OF  PARAMETERS 

PFN  -  PERMANENT  FILE  NAME  TO  BE  PROCESSED 

ID  -  ID  UNDER  WHICH  PFN  IS  CATALOGED 

(REQUIRED) 

DECK  -  ONE  OF  THE  FOLLOWING: 

0  -  PFN  IS  A  SEQUENTIAL  FILE 

<DECK>  -  PFN  IS  AN  UPDATE  PL  AND  *DECK  <DECK>  I 
TO  BE  EXTRACTED 

OMITTED  -  PFN  IS  AN  UPDATE  PL  AND  ALL  DECKS  ARE 
TO  BE  EXTRACTED 

VSN  -  VOLUME  SERIAL  NUMBER  OF  THE  TAPE 
(REQUIRED) 

SLOT  -  ONE  OF  THE  FOLLOWING: 

<SLOT  #>  -  VSN  IS  A  SLOT  TAPE 
OMITTED  -  VSN  IS  A  COMPUTER  CENTER  (DIEBOLD) 
TAPE 

L  -  ONE  OF  THE  FOLLOWING: 

0  -  THE  TAPE  IS  TO  BE  UNLABELLED 

<LABEL>  -  THE  TAPE  IS  TO  BE  LABELLED  WITH 
L-<LABEL> 

OMITTED  -  THE  TAPE  IS  TO  BE  LABELLED  WITH 
L-<ID> 

F  -  ONE  OF  THE  FOLLOWING: 

L  -  LONG  STRANGER  TAPE 

OMITTED  -  STRANGER  TAPE 
N  -  ONE  OF  THE  FOLLOWING: 

OMITTED  -  ASCII  (USASCII) 

EB  -  EBCDIC 

D  -  TAPE  DENSITY  (GE/PE/HD/HY/HI) 

(JOB  STATEMENT  MUST  HAVE  A  MATCHING  TAPE  REQUEST) 

T  -  RETENTION  PERIOD 

(DEFAULT:  1  DAY) 

C  -  CREATION  DATE 

(REQUIRED  ONLY  FOR  UNEXPIRED  TAPE  LABEL) 
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MRL  -  MAXIMUM  RECORD  LENGTH 

(DEFAULT:  80;  UPDATE  PL'S  WILL  BE  80) 

RB  -  NUMBER  OF  RECORDS  PER  BLOCK 

(DEFAULT:  AO) 

MBL  -  MAXIMUM  BLOCK  LENGTH  (MRL  TIMES  RB) 

(DEFAULT:  3200) 

(IF  MBL  >  3840  (9-TRACK)  OR  >  5120  ( 7- TRACK) , 

THEN  F-L  MUST  BE  SPECIFIED) 

U  -  UPDATE  OPTION.  ONE  OF: 

OMITTED  -  80-COLUMN  COMPILE  FILE  (UPDATE, 8, D) 
OTHER  -  80-COLUMN  SOURCE  FILE  (UPDATE, S-) 
PW1.PW2  -  PASSWORDS  FOR  PERMANENT  FILE  PFN 

DEFAULT  EXECUTE  STATEMENT 

BEGIN , TAPWR , , PFN , ID-* , DECK- , VSN-* , SLOT- , L-< ID> , F-S , N-US , 

D-GE , T- 1 , C- , MRL-80 , RB-40 , MBL-3200 , UO- , PW1 , PW2 . 

*  -  USER  MUST  SUPPLY 

MAX  FL:  60000B  (IF  UPDATE  REQUIRED);  21000B  OTHERWISE 

REMARKS 

NONE 

ERROR  MESSAGES 

TAPWR  REQUIRES  MAG  TAPE  AND 
MUST  BE  RUN  FROM  BATCH 

YOU  TRIED  TO  RUN  THE  PROCEDURE  UNDER  INTERCOM.  YOU  MUST 
PREPARE  A  BATCH  JOB  (DON'T  FORGET  THE  TAPE  PARAMETER  IN 
THE  JOB  STATEMENT)  AND  ROUTE  IT  TO  THE  INPUT  QUEUE. 

ID  MUST  BE  SPECIFIED 

YOU  MUST  SPECIFY  AN  ID.  THERE  IS  NO  DEFAULT. 

VSN  MUST  BE  SPECIFIED 

YOU  MUST  SPECIFY  THE  TAPE  VOLUME  SERIAL  NUMBER.  THERE  IS 
NO  DEFAULT. 

EXAMPLES 

1)  WRITE  A  SEQUENTIAL  SOURCE  PROGRAM  FILE  TO  TAPE  MYTAPE. 

THE  CARD  IMAGES  ARE  TO  BE  BLOCKED  40  PER  PHYSICAL  RECORD. 
THE  STRANGER  TAPE  IS  IN  SLOT  98. 

BEGIN , TAPWR , , MYPROG , MY ID , 0 , MYTAPE , 98 . 

2)  WRITE  ALL  DECKS  IN  UPDATE  LIBRARY  MYLIB  TO  TAPE  MYTAPE. 
THE  CARD  IMAGES  ARE  TO  BE  BLOCKED  40  PER  PHYSICAL  RECORD. 
THE  TAPE  IS  IN  DIEBOLD  POSITION  CA9876. 

BEGIN, TAPWR, , MYLIB, MYID, .CA9876. 

3)  WRITE  ONLY  DECK  MYDECK  FROM  LIBRARY  MYLIB  TO  TAPE  MYTAPE. 
THE  OTHER  SPECIFICATIONS  ARE  AS  IN  EXAMPLE  2. 

BEGIN, TAPWR, .MYLIB, MYID, MYDECK, CA9876. 
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4)  WRITE  SEQUENTIAL  DATA  FILE  MYDATA  TO  PE  TAPE  MYTAPE  IN 
SLOT  77.  THE  DATA  RECORDS  ARE  133  CHARACTER  LONG  AND  ARE 
TO  BE  BLOCKED  30  (MBL-3990,  SO  THIS  IS  TO  BE  AN  L-TAPE) . 
THE  PERMANENT  FILE  HAS  A  TURNKEY  PASSWORD.  THE  TAPE  IS 
TO  HAVE  A  RETENTION  PERIOD  OF  100  DAYS. 

BEGIN , TAPWR , , MYDATA, MYID , 0 , MYTAPE , 77 , MYLABEL , L , , PE , 
100, 133,30, 3990, MYTK. 


AUTHOR 

DAVID  V.  SOMMER  -  DTNSRDC  CODE  1892.2 
DATE  WRITTEN:  10/07/83 
DATE(S)  REVISED 

ANOTHER  COPY  OF  THIS  DOCUMENT  . 

BEGIN, DOCGET, .PROCFIL, .TAPWR, OUTPUT, MSACCES=<PASSWORD>. 
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PROCEDURE  'TIDBITS' 

PURPOSE 

LIST  FILE  OF  TIDBITS  (HINTS  ON  IMPROVED  COMPUTER  USAGE) 

FUNCTIONAL  CATEGORIES:  01 

COMPUTERS  (OPERATING  SYSTEMS) 

CDC  6000/CYBER  170  (NOS/BE) 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, TIDBITS, .OUTPUT, LEFT. 

DESCRIPTION  OF  PARAMETERS 
OUTPUT  -  LISTABLE  OUTPUT 

LEFT  -  OMITTED  OR  'LEFT'  -  PRINT  ON  LEFT  SIDE  OF  PAGE 

ANYTHING  ELSE  -  PRINT  CENTERED  ON  WIDE  PAPER 

DEFAULT  BEGIN  STATEMENT 
BEGIN , T IDB I TS , , OUTPUT , L . 

MAX  FL:  32000B 

REMARKS 

NONE 

MESSAGES 

<OUTPUT>  HAS  TIDBITS 

INDICATES  SUCCESSFUL  COMPLETION  (LEFT- JUSTIFIED  PRINTOUT) 

<OUTPUT>  HAS  TIDBITS  (CENTERED) 

INDICATES  SUCCESSFUL  COMPLETION  (CENTERED  PRINTOUT) 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  08/01/77 

DATE (S)  REVISED 

03/01/78  -  CONVERT  TO  CCL 

03/15/83  -  CHANGE  FROM  USING  PROGDOC  TO  GETDOC 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, .TIDBITS, OUTPUT, MSACCES-<PASSWORD>. 
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PROCEDURE  ' TPAUDIT' 


PURPOSE 

AUDIT  TAPES  ASSIGNED  TO  USER  INITIALS 

FUNCTIONAL  CATEGORIES:  QO 

COMPUTERS  (OPERATING  SYSTEMS) 

CDC  6000/CYBER  170  (NOS/BE) 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, TPAUDIT. 

DEFAULT  BEGIN  STATEMENT 
BEGIN, TPAUDIT. 

MAX  FL:  12500B 

REMARKS 

USER  INITIALS  TO  BE  AUDITED  WILL  BE  THE  LOGGED- IN  USER 
INITIALS. 

OUTPUT  DESCRIPTION 

A  LIST  OF  TAPES  ASSIGNED  TO  THE  LOGGED-IN  USER  INITIALS. 
AUTHOR 

JANET  MOXLEY  -  DTNSRDC  CODE  189.3 

DATE  WRITTEN:  FEBRUARY  1982 

DATE (S)  REVISED 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, .TPAUDIT, OUTPUT, MSACCES-<PASSWORD>. 
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PROCEDURE  ' TPGET ' 

PURPOSE 

AUTOMATICALLY  OBTAIN  TAPES  FROM  THE  COMPUTER  CENTER'S  TAPE 
LIBRARY 

FUNCTIONAL  CATEGORIES:  QO 

COMPUTERS  (OPERATING  SYSTEMS) 

CDC  6000/CYBER  170  (NOS/BE) 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, TPGET. 

DEFAULT  BEGIN  STATEMENT 
BEGIN, TPGET. 

MAX  FL:  12500B 

REMARKS 

USER  WILL  BE  PROMPTED  FOR: 

-  USER  INITIALS  (IN  THE  FORM:  XXXX) 

-  JOB  ORDER  NUMBER  (IN  THE  FORM:  9999999999) 

-  NUMBER:  TAPES  AND  SYSTEM  LOCATION 

OUTPUT  DESCRIPTION 

A  LIST  OF  THE  TAPE(S)  ASSIGNED. 

AUTHOR 

JANET  MOXLEY  -  DTNSRDC  CODE  189.3 

DATE  WRITTEN:  FEBRUARY  1982 

DATE (S)  REVISED 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, ,PROCFIL, .TPGET, OUTPUT, MSACCES-<PASSWORD>. 
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PROCEDURE  * TPRLS  * 


PURPOSE 

RELEASE  ASSIGNED  TAPES 

FUNCTIONAL  CATEGORIES:  QO 

COMPUTERS  (OPERATING  SYSTEMS) 

CDC  6000/CYBER  170  (NOS/BE) 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, TPRLS. 

DEFAULT  BEGIN  STATEMENT 
BEGIN, TPRLS. 

MAX  FL:  12500B 

REMARKS 

USER  WILL  BE  PROMPTED  TO  ENTER  TAPE  VSN'S  TO  BE  RELEASED. 
TAPES  MUST  BE  ASSIGNED  TO  THE  USER'S  LOGGED-IN  USER 
INITIALS. 

OUTPUT  DESCRIPTION 

VERIFICATION  OF  THE  RELEASED  TAPE(S). 

AUTHOR 

JANET  MOXLEY  -  DTNSRDC  CODE  189.3 

DATE  WRITTEN:  FEBRUARY  1982 

DATE (S)  REVISED 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, , TPRLS, OUTPUT, MSACCES-<PASSWORD> . 
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PROCEDURE  1 TRANPK ' 


PURPOSE 

COPY  CONTENTS  FROM  ONE  DEVICE  SET  TO  ANOTHER  FOR  BACKUP 

FUNCTIONAL  CATEGORIES:  K3 

COMPUTERS  (OPERATING  SYSTEMS) 

CDC  6000/CYBER  170  (NOS/BE) 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN , TRANPK, , VSNF , FS.RDF , CNF , MDF , EXF , VSNT , TS , TKF , TKT. 

DESCRIPTION  OF  PARAMETERS 

VSNF  -  VSN  OF  PACK  COPIED  FROM 
FS  -  SETNAME  COPIED  FROM 

RDF  -  USER  READ  PASSWORD  INITIALIZED  ON  DUM  FILE 

CNF  -  USER  CONTROL  PASSWORD  INITIALIZED  ON  DUM  FILE 

MDF  -  USER  MODIFY  PASSWORD  INITIALIZED  ON  DUM  FILE 

EXF  -  USER  EXTEND  PASSWORD  INITIALIZED  ON  DUM  FILE 

VSNT  -  VSN  OF  PACK  TO  COPY  TO 

TS  -  SETNAME  TO  COPY  TO 

TKF  -  DEVICE  SET  PASSWORD  COPIED  FROM 

TKT  -  DEVICE  SET  PASSWORD  COPIED  TO 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

IF  NO  TURNKEYS,  OMIT  THE  LAST  2  PARAMETERS. 

MAX  FL: 

REMARKS 

PERFORMS  BOTH  PACK  MOUNTS  IN  PROCEDURE. 

OUTPUT  IS  A  LIST  OF  FILES  MOVED  WITH  ID  AND  CYCLE  OF  EACH. 
EXAMPLE 

BEGIN , TRANPK , , DVS299 , SG 1 PK , RDPW , CNPW , MDPW , EXPW , DVS476 , SG2PK . 
AUTHOR 

SHARON  E  GOOD  -  DTNSRDC  CODE  1892.1 

DATE  WRITTEN:  07/02/76 

DATE (S)  REVISED 

03/01/78  -  CONVERT  TO  CCL 

01/18/79  -  ADD  DEVICE  SET  PASSWORDS 

07/08/81  -  CHANGE  NAME  FROM  'TRANPAK'  TO  'TRANPK' 

-  ADD  EXF  PARAMETER  FOR  EXTEND  PASSWORD 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, ,PROCFIL, , TRANPK, OUTPUT, MSACCES-<PASSWORD> . 
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PROCEDURE  'UPDADD' 


PURPOSE 

ADD  ONE  DECK  TO  AN  UPDATE  LIBRARY 

FUNCTIONAL  CATEGORIES:  K3  Q7 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN , UPDADD, , LIB , ID, PROG , AFTER , LFN , AC , PW1 , PW2 , C , S . 

DESCRIPTION  OF  PARAMETERS 

LIB  -  FIRST  PART  OF  PFN 

(FULL  PFN  IS  LIB_PL) 

ID  -  ID  UNDER  WHICH  IT  IS  CATALOGED 

PROG  -  DECK  NAME  OF  ROUTINE  TO  BE  ADDED 

( ’ *DECK  PROG'  IS  GENERATED  AUTOMATICALLY) 
AFTER  ~  DECK  NAME  IT  IS  TO  FOLLOW 

(IF  OMITTED,  NEW  DECK  GOES  AT  END  OF  LIBRARY) 
LFN  -  LFN  OF  FILE  CONTAINING  DECK  TO  BE  J5DED 
(NO  *DECK  CARD) 

AC  -  JOB  ORDER  NUMBER  FOR  CATALOG 

(MAY  BE  OMITTED) 

PW1.PW2  ~  PASSWORDS 
C  -  COMPILE  FILE  (0  FOR  NONE) 

S  -  SOURCE  FILE  (0  FOR  NONE) 


DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  42000B 

REMARKS 

THE  LOWEST  CYCLE  OF  LIB_PL  IS  PURGED,  IF  POSSIBLE.  AT  LEAST 
2  CYCLES  ARE  ALWAYS  RETAINED. 


AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 
DATE  WRITTEN:  03/10/76 


m 


DATE (S)  REVISED 

03/01/78  -  CONVERT  TO  CCL 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, , UPDADD, OUTPUT, MSACCES-<PASSWORD>. 
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PROCEDURE  ' UPDDELE 


PURPOSE 

DELETE  ONE  DECK  FROM  AN  UPDATE  LIBRARY 

FUNCTIONAL  CATEGORIES:  K3  Q7 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN , UPDDELE , , LI B , ID , PROG , AC , PW 1 , PW2 , S . 

DESCRIPTION  OF  PARAMETERS 

LIB  -  FIRST  PART  OF  PFN 

(FULL  PFN  IS  LIB_PL) 

ID  -  ID  UNDER  WHICH  IT  IS  CATALOGED 

PROG  -  DECK  NAME  OF  ROUTINE  TO  BE  DELETED 

('*DECK  PROG'  IS  GENERATED  AUTOMATICALLY) 

AC  -  JOB  ORDER  NUMBER  FOR  CATALOG 

(MAY  BE  OMITTED) 

PW1.PW2  -  PASSWORDS 
S  -  SOURCE  FILE  (0  FOR  NONE) 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  42000B 

REMARKS 

NONE 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  03/10/76 

DATE (S)  REVISED 

03/01/78  -  CONVERT  TO  CCL 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, .UPDDELE, OUTPUT, MSACCES-<PASSWORD>. 
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PROCEDURE  'UPDDOC* 

PURPOSE 

LIST  DOCUMENTATION  FOR  PROCEDURES  UPDADD,  UPDDELE ,  UPDDOC, 
UPDGET,  UPDLIST,  UPDREPL 

FUNCTIONAL  CATEGORIES:  01 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN , UPDDOC , , OUTPUT , LEFT . 

DESCRIPTION  OF  PARAMETERS 
OUTPUT  -  LISTABLE  OUTPUT 

LEFT  -  OMITTED  -  PRINT  LEFT- JUSTIFIED  ON  PAGE 
NON-BLANK  -  PRINT  CENTERED  ON  WIDE  PAGE 

DEFAULT  BEGIN  STATEMENT 
BEGIN , UPDDOC , , OUTPUT . 

MAX  FL:  25000B 

REMARKS 

A  BANNER  PAGE  PRECEDES  THE  LIST  AND  CONTAINS  THE  WORD 
'UPDDOC'.  A  BANNER  PAGE  WITH  THE  WORD  'END'  FOLLOWS  THE 
LIST. 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  02/10/77 

DATE (S)  REVISED 

03/01/78  -  CONVERT  TO  CCL 

05/17/83  -  USE  PROGRAM  GETDOC  INSTEAD  OF  MANYDOC 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, .UPDDOC, OUTPUT, MSACCES»<PASSWORD> . 
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PROCEDURE  1 UPDGET ' 

PURPOSE 

EXTRACT  ONE  DECK  FROM  AN  UPDATE  LIBRARY  (UPDATE, C)  AND, 
OPTIONALLY,  ADD  EDITOR  SEQUENCING 

FUNCTIONAL  CATEGORIES:  K3  Q7 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN , UPDGET , , LIB , ID, DECK , COMPILE , C72 , E , START , INCR , PW1 , PW2 . 

DESCRIPTION  OF  PARAMETERS 

LIB  -  1-7  CHARACTERS:  FIRST  PART  OF  PFN 
(FULL  PFN  IS  LIB  PL) 

ID  -  ID  UNDER  WHICH  IT  IS  CATALOGED 
DECK  -  DECK  NAME  OF  ROUTINE  TO  BE  EXTRACTED 
COMPILE  -  COMPILE  FILE  (UPDATE, C-COMP I LE) 

(WILL  CONTAIN  EXTRACTED  DECK,  UNLESS  C72  USED) 

C72  -  IF  SPECIFIED,  WILL  CONTAIN  72-COLUMN  COPY  OF  THE 

COMPILE  FILE.  THE  COMPILE  FILE  IS  NOT  AVAILABLE 
TO  THE  USER.) 

E  -  OMITTED  -  DO  NOT  ADD  EDITOR  SEQUENCING 

ANY  WORD  STARTING  WITH  'E'  -  ADD  EDITOR  SEQUENCING 
(THIS  PARAMETER  IS  EFFECTIVE  ONLY  IF  PARAMETER 
'C72'  IS  SPECIFIED) 

START  -  FIRST  EDITOR  SEQUENCE  NUMBER  (IF  EDITOR  SEQUENCING 
REQUESTED)  (DEFAULT:  20) 

INCR  -  INCREMENT  FOR  EDITOR  SEQUENCING  (DEFAULT:  10) 

NOTE:  DEFAULT  START  AND  INCR  WILL  GIVE  10  TIMES 

THE  COMPILE  FILE  CARD  NUMBERS  IF  THE  DECK  HAS 
NO  MODIFYING  IDENTS. 

PW1.PW2  -  PASSWORDS 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  42000B 


REMARKS 

NONE 

AUTHOR 

DAVID  V  SOMMER 


DTNSRDC  CODE  1892.2 


DATE  WRITTEN:  03/10/76 
DATE (S)  REVISED 

07/13/76  -  ADD  EDITOR  SEQUENCING  OPTION 
02/04/77  -  ADD  PASSWORDS 
03/01/78  -  CONVERT  TO  CCL 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, .UPDGET, OUTPUT, MSACCES-<PASSWORD>. 


04/30/84 


2-173 


UPDGET  -  1  OF  1 


••  y-;v.l 


V-VM 


V 


PROCEDURE  ' UPDGETS ' 


PURPOSE 

EXTRACT  ONE  DECK  FROM  AN  UPDATE  LIBRARY  (UPDATE, S)  AND, 
OPTIONALLY,  ADD  EDITOR  SEQUENCING 

FUNCTIONAL  CATEGORIES:  K3  Q7 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN , UPDGETS , , LIB , ID , DECK , SOURCE , C72 , E , START , 1 NCR , PW 1 , PW2 . 

DESCRIPTION  OF  PARAMETERS 

LIB  -  1-7  CHARACTERS:  FIRST  PART  OF  PFN 
(FULL  PFN  IS  LIB  PL) 

ID  -  ID  UNDER  WHICH  IT  IS  CATALOGED 

DECK  -  DECK  NAME  OF  ROUTINE  TO  BE  EXTRACTED 
SOURCE  -  SOURCE  FILE  (UPDATE, S-SOURCE) 

(COMDECKS,  IF  ANY,  INCLUDED) 

(WILL  CONTAIN  EXTRACTED  DECK,  UNLESS  C72  USED) 

C72  -  IF  SPECIFIED,  WILL  CONTAIN  72-COLUMN  COPY  OF  THE 

COMPILE  FILE.  THE  COMPILE  FILE  IS  NOT  AVAILABLE 
TO  THE  USER.) 

E  -  OMITTED  -  DO  NOT  ADD  EDITOR  SEQUENCING 

ANY  WORD  STARTING  WITH  'E'  -  ADD  EDITOR  SEQUENCING 
(THIS  PARAMETER  IS  EFFECTIVE  ONLY  IF  PARAMETER 
'C72'  IS  SPECIFIED) 

START  -  FIRST  EDITOR  SEQUENCE  NUMBER  (IF  EDITOR  SEQUENCING 
REQUESTED)  (DEFAULT:  20) 

INCR  -  INCREMENT  FOR  EDITOR  SEQUENCING  (DEFAULT:  10) 

NOTE:  DEFAULT  START  AND  INCR  WILL  GIVE  10  TIMES 

THE  COMPILE  FILE  CARD  NUMBERS  IF  THE  DECK  HAS 
NO  MODIFYING  IDENTS. 

PW1.PW2  -  PASSWORDS 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  42000B 

REMARKS 

NONE 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  05/13/77 

DATE (S)  REVISED 

03/01/78  -  CONVERT  TO  CCL 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, ,PROCFIL, .UPDGETS, OUTPUT, MSACCES-<PASSWORD>. 
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PROCEDURE  ' UPDGETT 


PURPOSE 

EXTRACT  ONE  DECK  FROM  AN  UPDATE  LIBRARY  (UPDATE, T)  AND, 
OPTIONALLY,  ADD  EDITOR  SEQUENCING 

FUNCTIONAL  CATEGORIES:  K3  Q7 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN , UPDGETT , , LIB , ID , DECK , SOURCE , C72 , E , START , INCR , PWl , PW2 . 

DESCRIPTION  OF  PARAMETERS 

LIB  -  1-7  CHARACTERS:  FIRST  PART  OF  PFN 
(FULL  PFN  IS  LIB  PL) 

ID  -  ID  UNDER  WHICH  IT  IS  CATALOGED 

DECK  -  DECK  NAME  OF  ROUTINE  TO  BE  EXTRACTED 
SOURCE  -  SOURCE  FILE  (UPDATE, T-SOURCE) 

(NO  COMDECKS  INCLUDED) 

(WILL  CONTAIN  EXTRACTED  DECK,  UNLESS  C72  USED) 

C72  -  IF  SPECIFIED,  WILL  CONTAIN  72-COLUMN  COPY  OF  THE 

COMPILE  FILE.  THE  COMPILE  FILE  IS  NOT  AVAILABLE 
TO  THE  USER.) 

E  -  OMITTED  -  DO  NOT  ADD  EDITOR  SEQUENCING 

ANY  WORD  STARTING  WITH  'E'  -  ADD  EDITOR  SEQUENCING 
(THIS  PARAMETER  IS  EFFECTIVE  ONLY  IF  PARAMETER 
'C72 '  IS  SPECIFIED)  . 

START  -  FIRST  EDITOR  SEQUENCE  NUMBER  (IF  EDITOR  SEQUENCING 
REQUESTED)  (DEFAULT:  20) 

INCR  -  INCREMENT  FOR  EDITOR  SEQUENCING  (DEFAULT:  10) 

NOTE:  DEFAULT  START. AND  INCR  WILL  GIVE  10  TIMES 

THE  COMPILE  FILE  CARD  NUMBERS  IF  THE  DECK  HAS 
NO  MODIFYING  IDENTS. 

PW1.PW2  -  PASSWORDS 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  42000B 

REMARKS 

NONE 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  05/13/77 

DATE(S)  REVISED 

03/01/78  -  CONVERT  TO  CCL 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, .UPDGETT, OUTPUT, MSACCES-<PASSWORD>. 
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PROCEDURE  ' UPDLIST' 

PURPOSE 

LIST  DECK/COMDECK  NAMES  IN  UPDATE  LIBRARY  WITH  COUNT  OF 
RECORDS  IN  EACH  DECK/COMDECK 

FUNCTIONAL  CATEGORIES:  01  Q3 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, UPDLIST, , LIB, ID, OUTPUT. 

DESCRIPTION  OF  PARAMETERS 

LIB  -  FIRST  PART  PF  PFN 

(FULL  PFN  IS  LIB  PL) 

ID  -  ID  UNDER  WHICH  IT  IS  CATALOGED 

OUTPUT  -  LISTABLE  OUTPUT 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  42000B 

REMARKS 

UPDATE  IS  RUN  TO  GET  A  SOURCE  FILE.  THEN  PROGRAM  'DECK*  ON 
UTILITY  IS  RUN  AGAINST  THE  SOURCE  FILE.  THEREFORE,  ANY 
IDENTS  WILL  NOT  BE  LISTED,  AS  THEY  HAVE  ALREADY  BEEN 
PROCESSED  BY  UPDATE. 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  04/12/76 

DATE (S)  REVISED 
04/23/76 
05/04/76 
05/25/76 

03/01/78  -  CONVERT  TO  CCL 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, .UPDLIST, OUTPUT, MSACCES«<PASSWORD> . 
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PROCEDURE  'UPDREPL' 


PURPOSE 

REPLACE  ONE  DECK  IN  AN  UPDATE  LIBRARY 

FUNCTIONAL  CATEGORIES:  K3  Q7 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN , UPDREPL , , LIB , ID, PROG , AFTER , LFN , AC , PW1 , PW2 , C , S . 

DESCRIPTION  OF  PARAMETERS 

LIB  -  FIRST  PART  OF  PFN 

(FULL  PFN  IS  LIB  PL) 

ID  -  ID  UNDER  WHICH  IT  IS  CATALOGED 

PROG  -  DECK  NAME  OF  ROUTINE  TO  BE  REPLACED 

('♦DECK  PROG'  IS  GENERATED  AUTOMATICALLY) 

AFTER  -  DECK  NAME  IT  IS  TO  FOLLOW 

(IF  OMITTED,  NEW  DECK  GOES  AT  END  OF  LIBRARY) 

LFN  -  LFN  OF  FILE  CONTAINING  DECK  TO  BE  REPLACED 
(NO  *DECK  CARD) 

AC  -  JOB  ORDER  NUMBER  FOR  CATALOG 

(MAY  BE  OMITTED) 

PW1.PW2  -  PASSWORDS 

C  -  COMPILE  FILE  (0  FOR  NONE) 

S  -  SOURCE  FILE  (0  FOR  NONE) 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  42000B 

REMARKS 

THE  LOWEST  CYCLE  OF  LIB  PL  IS  PURGED,  IF  POSSIBLE.  AT  LEAST 
2  CYCLES  ARE  ALWAYS  RETAINED. 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 
DATE  WRITTEN:  03/11/76 
DATE(S)  REVISED 

05/25/76  -  DOUBLE  UPDATE  REPLACED  BY  SINGLE  UPDATE 
03/01/78  -  CONVERT  TO  CCL 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, , UPDREPL, OUTPUT, MSACCES-<PASSWORD> . 
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PROCEDURE  'UTILITY' 


PURPOSE 

EXECUTE  A  PROGRAM  ON  EDITLIB  USER  LIBRARY  'UTILITY' 

FUNCTIONAL  CATEGORIES:  LO  Q3 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, UTILITY, , PROG, PARAMS. 

DESCRIPTION  OF  PARAMETERS 

PROG  -  PROGRAM  TO  BE  EXECUTED 
PARAMS  -  UP  TO  19  PARAMETERS  FOR  'PROG' 

(KEYWORD  PARAMETERS  MUST  BE  S-DELIMITED,  E.G. , 
$OPT-L$.) 

DEFAULT  BEGIN  STATEMENT 

NO  MEANINGFUL  DEFAULT  VALUES 

MAX  FL:  DEPENDS  ON  PROGRAM  BEING  EXECUTED 

REMARKS 

NONE 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  EARLY  1975 

DATE (S)  REVISED 

03/01/78  -  CONVERT  TO  CCL 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, .UTILITY, OUTPUT ,MSACCES-<PASSWORD>. 
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PROCEDURE  ’VENUS' 
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PURPOSE 

ATTACH  AND  EXECUTE  ONE  OF  THE  VENUS  RETRIEVAL  PROGRAMS 

FUNCTIONAL  CATEGORIES:  SO 

COMPUTERS  (OPERATING  SYSTEMS) 

CDC  6000/CYBER  170  (NOS/BE) 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN , VENUS ,, WHICH, INPUT , OUTPUT , SUBSET . 

DESCRIPTION  OF  PARAMETERS 

WHICH  -  VENUS  PROGRAM  DESIRED 

OMITTED  -  VENUS  (SINGLE  FILE  VERSION) 

MF  -  VENUS  (MULTIPLE  FILE  VERSION) 

PL  -  VENPL  (PLOTTING  LANGUAGE  PROCESSOR) 

RP  -  VENRP  (REPORT  GENERATOR) 

INPUT  -  COMMAND  INPUT  FILE 

(IF  TERMINAL,  USER  MUST  ' CONNECT, INPUT ' ) 
OUTPUT  -  LISTABLE  OUTPUT 

(IF  TERMINAL,  USER  MUST  ’ CONNECT , OUTPUT ’ ) 
SUBSET  -  OUTPUT  FILE  FOR  THE  SUBSET  COMMAND 

DEFAULT  BEGIN  STATEMENT 

BEGIN , VENUS , , , INPUT , OUTPUT , SUBSET . 

MAX  FL:  61000B  (MF  MAY  NEED  MORE) 

REMARKS 

NONE 

ERROR  MESSAGES 

FIRST  PARAMETER  («WHICH>)  INVALID 
MUST  BE  ONE  OF  MF,  PL,  RP  OR  OMITTED 
SELF-EXPLANATORY 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  09/20/77 

DATE (S)  REVISED 

03/01/78  -  CONVERT  TO  CCL 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, .VENUS, OUTPUT, MSACCES-<PASSWORD>. 
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PROCEDURE  'WHATLIB 


PURPOSE 

LIST  LIBRARIES  SPECIFIED  IN  LAST  'LIBRARY'  COMMAND 

FUNCTIONAL  CATEGORIES:  QO 

LOCATION  OF  PROCEDURE 

SYSTEM  PUBLIC-ACCESS  PROCEDURE  FILE 

USAGE 

BEGIN, WHATLIB, .OUTPUT. 

DESCRIPTION  OF  PARAMETER 
OUTPUT  -  LISTABLE  OUTPUT 

(TO  PRINT  AT  INTERACTIVE  TERMINAL,  MUST  BE 
CONNECTED.) 

DEFAULT  BEGIN  STATEMENT 
BEGIN, WHATLIB, .OUTPUT. 

MAX  FL:  22000B 

REMARKS 

OF  LIMITED  USE  IN  BATCH. 

AUTHOR 

DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 

DATE  WRITTEN:  MID-1975 

DATE (S)  REVISED 

03/01/78  -  CONVERT  TO  CCL 

ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, .WHATLIB, OUTPUT, MSACCES-<PASSWORD> . 
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PROCEDURE  'XEROX' 


PURPOSE 

ROUTE  A  COPY  OF  A  FILE  TO  XEROX  8700 

FUNCTIONAL  CATEGORIES:  QO  A4 

COMPUTERS  (OPERATING  SYSTEMS) 

CDC  6000/CYBER  170  (NOS/BE) 

LOCATION  OF  PROCEDURE 

PUBLIC-ACCESS  PROCEDURE  FILE 

SYSTEM  PUBLIC-ACCESS  INTERACTIVE  PROCEDURE  FILE 
USAGE 

BEGIN , XEROX , , LFN , FID, COP IES , JOB , PAPER , DUPLEX , FORMS . 

BEGIN, XEROX, I, <PARAMS>  <—  FOR  INTERACTIVE  VERSION 

BEGIN, XEROX, I,?  <—  FOR  INTERACTIVE  PROCESSING 

DESCRIPTION  OF  PARAMETERS 

LFN  -  LISTABLE  LOCAL  FILE  TO  BE  ROUTED 
(REWOUND  AFTER  USE) 

FID  -  FILE  ID  FOR  ROUTE  (USE  YOUR  USER  INITIALS) 

(ROUTE, . . . ,FID-*<FID>, . . .) 

COPIES  -  NUMBER  OF  COPIES 

(A  BLUE  SEPARATOR  PAGE  WILL  FOLLOW  EACH  COPY,  THUS, 
IF  YOU  HAVE  MANY  COPIES  OF  A  SMALL  DOCUMENT,  YOU 
MAY  WISH  TO  COMBINE  THE  COPIES  INTO  ONE  FILE  BEFORE 
SENDING  IT  TO  THE  XEROX.) 

JOB  -  NAME  OF  THE  XEROX  8700  JOB  TO  PROCESS  THE  FILE 

(IN  EACH  OF  THE  FOLLOWING,  THE  LAST  3  CHARACTERS  OF 
THE  JOB  NAME  INDICATE  THE  STYLE  (LND- LANDSCAPE; 
PRT-PORTRAIT) .  ALSO,  THE  NUMBER  OF  CHARACTERS  IS 
IN  ADDITION  TO  THE  CARRIAGE  CONTROL  CHARACTER  IN 
COLUMN  1) 


MAX 


JOB 

COLS  X 

LNS 

TYPE 

USE 

STDLND 

136  X 

64 

SANS- 

SERIF 

STANDARD  PRINTOUTS 
(COMPILATIONS/LOAD 
MAPS,  PGM  OUTPUT  - 
CONTINUOUS) 

CMP LND 

136  X 

64 

SANS- 

SERIF 

LIKE  STDLND  -  FORTRAN 
COMPILATIONS/LOAD 

MAPS  -  EACH  ROUTINE 
STARTS  ON  A  NEW  PAGE 

LN8LND 

136  X 

88 

SANS- 

SERIF 

8  LPI  -  DAYFILES 
COMPILATIONS  AND 

LOAD  MAPS  DONE  WITH 
PD-8 

08/30/84 

2 AC LND 

66  X  60 
(TWICE) 
2-181 

SANS- 

SERIF 

2-ACROSS  (LIKE 
COMPUTER  CENTER  NOTE) 
XEROX  -  1  OF  : 

STDPRT 

72  X 

64 

PICA 

1T-STYLE:  GENERAL 
DOCUMENTATION 

ST3PRT 

94  X 

66 

SANS- 

SERIF 

VERY  LARGE  MARGINS 

ST4PRT 

87  X 

64 

ELITE 

1T-STYLE:  GENERAL 
DOCUMENTATION; 

MANUALS  (CONTINUOUS 
PRINTOUT) 

DOCPRT 

87  X 

64 

ELITE 

LIKE  ST4PRT,  EXCEPT 
DOCUMENTS  HAVE  ' . ’  IN 
COLUMN  76  TO  FORCE 

EACH  TO  START  ON  A  NEW 
PAGE 

VAX DOC 

87  X 

66 

ELITE 

LIKE  ST4PRT,  EXCEPT 
EACH  PAGE  HAS  EXACTLY 
66  LINES  (NO  '1') 

2UPPRT 

136  X 

132 

SANS- 

SERIF 

2-UP  COMPACT  STOR¬ 
AGE  OF  STANDARD 
PRINTOUTS 

2UCPRT 

136  X 

132 

SANS- 

SERIF 

LIKE  2UPPRT,  EXCEPT 
CONTINUOUS  (FOR  2- 
PAGE  PLOTS) 

2U8PRT 

136  X 

176 

SANS- 

LIKE  2UPPRT,  8  LPI 

SERIF 

PAPER  -  PAPER  TO  BE  USED 

PLAIN  -  UNPUNCHED 

ANYTHING  ELSE  -  3-HOLE  PUNCHED 

DUPLEX  -  ONE-  OR  TWO-SIDED  PRINTING  (SIMPLEX/DUPLEX) 

OMITTED  OR  YES  -  TWO-SIDED  PRINTING 
NO  -  ONE-SIDED  PRINTING 

FORMS  -  NAME  OF  FORMS  OVERLAY 

NONE  -  NO  FORMS  OVERLAY  (DEFAULT) 

LANDSCAPE: 

FRAME 1  -  BOX  AROUND  PAGE  (ONE  SOLID  LINE) 

FRAME 2  -  BOX  AROUND  PAGE  (TWO  SOLID  LINES) 

FRAME3  -  BOX  AROUND  PAGE  (THREE  SOLID  LINES) 
FRAME4  -  BOX  AROUND  PAGE  (ONE  SOLID/SHADED  LINE) 
2UPL1  -  SOLID  LINE  DIVIDING  TWO  PAGES 
2UPB1  -  SOLID  BOXES  DRAWN  AROUND  TWO  PAGES 
2UPL2  -  DOUBLE  SOLID  LINES  DIVIDING  TWO  PAGES 
PORTRAIT: 

FRAMP1  -  BOX  AROUND  PAGE  (ONE  SOLID  LINE) 

FRAMP2  -  BOX  AROUND  PAGE  (TWO  SOLID  LINES) 

FRAMP3  -  BOX  AROUND  PAGE  (THREE  SOLID  LINES) 
FRAMP4  -  BOX  AROUND  PAGE  (ONE  SOLID/SHADED  LINE) 
2UP3L  -  TRIPLE  SOLID  LINES  DIVIDING  TWO  PAGES 
2UPSL  -  SINGLE  SHADED  LINE  DIVIDING  TWO  PAGES 
2UPSB  -  SHADED  BAR  DIVIDING  TWO  PAGES 
2UPB2  -  TWO  SOLID  LINE  BOXES  ON  A  PAGE 
WEEKLY  -  CHECKLIST  BY  DAYS 
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JDL  -  JOB  DESCRIPTOR  LIBRARY  NAME 

OMITTED  -  USE  THE  DEFAULT  PUBLIC  LIBRARY 
COD189  -  REQUIRED  FOR  CODE  189  PERSONNEL 

DEFAULT  BEGIN  STATEMENT 

BEGIN , XEROX , ,  OUTPUT ,  <? ,  1 ,  STDLND ,  3HOLE ,  YES ,  NONE ,  DFAULT . 

@  -  FID  REQUIRED 

MAX  FL:  13000B 

REMARKS 

LANDSCAPE  STYLE  IS  HORIZONTAL  (11  X  8-1/2);  PORTRAIT  IS 
VERTICAL  (8-1/2  X  11). 

DUPLEX  PRINTING  SHOULD  BE  USED  UNLESS  THERE  IS  A  COMPELLING 
REQUIREMENT  FOR  SIMPLEX  PRINTING. 

SAMPLES  OF  THE  AVAILABLE  TYPES  OF  XEROX  8700  OUTPUT  MAY  BE 
VIEWED  IN  USER  SERVICES. 

THE  FILE  <LFN>  IS  REWOUND  AFTER  COMPLETION  OF  THE  PROCEDURE. 

THIS  IS  AN  INTERACTIVE  PROCEDURE.  ANY  PARAMETER  ERRORS  WILL 
CAUSE  PROMPTING  FOR  A  VALID  RESPONSE.  WHEN  RUN  FROM  BATCH, 
MOST  PARAMETER  ERRORS  WILL  CAUSE  THE  PROCEDURE  TO  TERMINATE. 

ERROR  MESSAGES 

COPIES  (<COPIES>)  MUST  BE  NUMERIC 

YOU  SPECIFIED  A  NON-NUMERIC  VALUE  FOR  THE  NUMBER  OF 
COPIES.  LOOK  FOR  TOO  MANY  OR  TOO  FEW  COMMAS. 

FID  REQUIRED 

THE  FILE  ID  MUST  BE  SPECIFIED. 


AUTHOR 

BARBARA  DAVIS  -  DTNSRDC  CODE  1896 
DAVID  V  SOMMER  -  DTNSRDC  CODE  1892.2 


DATE  WRITTEN:  1983  (BD) 


DATE (S)  REVISED 
01/16/84  -  DVS 

01/27/84  -  DVS 
04/23/84  -  DVS 
05/02/84  -  DVS 
05/21/84  -  DVS 
06/05/84  -  DVS 
08/30/84  -  PUT 
-  PUT 


-  GENERALIZED  AND  ADDED  TO  PUBLIC  PROCEDURE 
FILE 

-  REWIND  LFN  AFTER  USE 

-  MAKE  INTERACTIVE 

-  ADD  VAX DOC  TO  LIST  OF  <J0B>S 

-  ADD  JDL  PARAMETER 

-  ADD  2UCPRT  TO  LIST  OF  JOB  NAMES 
INTERACTIVE  VERSION  INTO  INTEACTIVE  FILE 
NON- INTERACTIVE  VERSION  INTO  REGULAR  FILE 


ANOTHER  COPY  OF  THIS  DOCUMENT 

BEGIN, DOCGET, .PROCFIL, .XEROX, OUTPUT, MSACCES-<PASSWORD>. 
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INITIAL  DISTRIBUTION 


COPIES: 

12  DIRECTOR 

DEFENSE  TECHNICAL  INFORMATION  CENTER  (DTIC) 

CAMERON  STATION 

ALEXANDRIA,  VIRGINIA  23314 


CENTER  DISTRIBUTION 


COPIES: 


1 

18/1809 

GLEISSNER,  G. 

1 

1804 

AVRUNIN,  L. 

1 

1805 

CUTHILL,  E.  H. 

2 

1808 

WILDY,  D. 

1 

182 

CAMARA,  A.  W. 

1 

184 

SCHOT,  J.  W. 

1 

185 

CORIN,  T. 

1 

187 

ZUBKOFF,  M.  J. 

1 

189 

GRAY,  G.  R. 

1 

189.2 

HAYDEN,  H.  P. 

1 

189.3 

MORRIS,  JEAN 

40 

1892.1 

STRICKLAND,  J. 

5 

1892.2 

SOMMER,  D.  V. 

1 

1892.3 

MINOR,  L.  R. 

1 

1894 

SEALS,  w. 

1 

1896 

GLOVER,  A. 

1 

1896.2 

DENNIS,  L. 

1 

522 

TIC  (C) 

1 

522.2 

TID  (A) 

1 

93 

PATENT  COUNSEL 

DTNSRDC  ISSUES  THREE  TYPES  OF  REPORTS 

1.  DTNSRDC  REPORTS,  A  FORMAL  SERIES,  CONTAIN  INFORMATION  OF  PERMANENT  TECH¬ 
NICAL  VALUE.  THEY  CARRY  A  CONSECUTIVE  NUMERICAL  IDENTIFICATION  REGARDLESS  OF 
THEIR  CLASSIFICATION  OR  THE  ORIGINATING  DEPARTMENT. 

2.  DEPARTMENTAL  REPORTS,  A  SEMIFORMAL  SERIES,  CONTAIN  INFORMATION  OF  A  PRELIM¬ 
INARY.  TEMPORARY,  OR  PROPRIETARY  NATURE  OR  OF  LIMITED  INTEREST  OR  SIGNIFICANCE. 
THEY  CARRY  A  DEPARTMENTAL  ALPHANUMERICAL  IDENTIFICATION. 

3.  TECHNICAL  MEMORANDA,  AN  INFORMAL  SERIES,  CONTAIN  TECHNICAL  DOCUMENTATION 
OF  LIMITED  USE  AND  INTEREST.  THEY  ARE  PRIMARILY  WORKING  PAPERS  INTENDED  FOR  IN¬ 
TERNAL  USE.  THEY  CARRY  AN  IDENTIFYING  NUMBER  WHICH  INDICATES  THEIR  TYPE  AND  THE 
NUMERICAL  CODE  OF  THE  ORIGINATING  DEPARTMENT.  ANY  DISTRIBUTION  OUTSIDE  DTNSRDC 
MUST  BE  APPROVED  BY  THE  HEAD  OF  THE  ORIGINATING  DEPARTMENT  ON  A  CASE-BY-CASE 
BASIS. 


END 
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